object Form1: TForm1 Left = 92 Top = 187 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Programme d'#39'installation de NetOneEcole' ClientHeight = 281 ClientWidth = 614 Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poDesktopCenter OnActivate = FormActivate OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 64 Top = 8 Width = 276 Height = 24 Caption = 'Installation de NetOneEcole�' Font.Charset = DEFAULT_CHARSET Font.Color = clYellow Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Image1: TImage Left = 8 Top = 8 Width = 57 Height = 49 Picture.Data = {} end object Label2: TLabel Left = 8 Top = 64 Width = 192 Height = 16 Caption = 'Pour installer NetOneEcole:' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 168 Top = 168 Width = 150 Height = 13 Caption = 'Liste des ordinateurs � utiliser: ' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False end object Label4: TLabel Left = 16 Top = 168 Width = 78 Height = 13 Caption = 'Nom du serveur:' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False end object Label11: TLabel Left = 256 Top = 36 Width = 133 Height = 20 Caption = 'Version Gratuite' Color = clBlack Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False Transparent = True end object LabelA: TLabel Left = 8 Top = 152 Width = 220 Height = 13 Caption = 'Analyse en cours, Veuillez patienter ...' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False end object Label15: TLabel Left = 64 Top = 26 Width = 146 Height = 13 Caption = 'Logiciel d'#39'administration r�seau' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -5 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Memo1: TMemo Left = 8 Top = 80 Width = 441 Height = 73 Color = clInfoBk Enabled = False Lines.Strings = ( 'Si cet ordinateur fonctionnne en r�seau alors appuyez sur le bou' + 'ton Installation en r�seau ' 'sinon appuyez sur le bouton Installation mono-poste. ' '' 'ATTENTION: Pour la premi�re installation de NetOneEcole en fonct' + 'ionnement r�seau, vous ' 'devez au pr�alable ex�cuter le programme InstA.exe sur tous vos ' + 'ordinateurs.') TabOrder = 0 end object Panel1: TPanel Left = 456 Top = 0 Width = 158 Height = 281 Align = alRight BevelInner = bvRaised BevelOuter = bvLowered BevelWidth = 2 Color = clBlack TabOrder = 1 object Image2: TImage Left = 4 Top = 4 Width = 150 Height = 273 Align = alClient Picture.Data = {} Stretch = True end object SpeedButton1: TSpeedButton Left = 16 Top = 24 Width = 129 Height = 33 Caption = 'Analyse' Visible = False OnClick = SpeedButton1Click end object SpeedButton3: TSpeedButton Left = 16 Top = 128 Width = 129 Height = 33 Caption = 'Installation en r�seau' Enabled = False Visible = False OnClick = SpeedButton3Click end object SpeedButton4: TSpeedButton Left = 16 Top = 216 Width = 129 Height = 49 Caption = 'Annuler' OnClick = SpeedButton4Click end object BtnRedem: TSpeedButton Left = 16 Top = 72 Width = 129 Height = 33 Caption = 'Mot de passe' Visible = False OnClick = BtnRedemClick end object SpeedButton2: TSpeedButton Left = 16 Top = 72 Width = 129 Height = 33 Caption = 'pr�-Installation' Enabled = False Visible = False OnClick = SpeedButton2Click end object SpeedButton5: TSpeedButton Left = 16 Top = 24 Width = 129 Height = 33 Caption = 'Installation en r�seau' Visible = False OnClick = c end object SpeedButton6: TSpeedButton Left = 16 Top = 72 Width = 129 Height = 33 Caption = 'Installation monoposte' Visible = False OnClick = SpeedButton6Click end object Panel3: TPanel Left = 16 Top = 112 Width = 129 Height = 57 Color = clGreen TabOrder = 0 Visible = False OnClick = Label16Click object Label16: TLabel Left = 8 Top = 8 Width = 113 Height = 49 AutoSize = False Caption = 'Appuyez ici, pour copier InstA.exe sur disquette.' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True WordWrap = True OnClick = Label16Click end end end object ComboBox1: TComboBox Left = 16 Top = 184 Width = 121 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 Visible = False end object CheckListBox1: TCheckListBox Left = 168 Top = 184 Width = 257 Height = 89 Columns = 2 ItemHeight = 13 TabOrder = 3 Visible = False end object Memo2: TMemo Left = 8 Top = 152 Width = 441 Height = 121 Color = clBlack Ctl3D = False Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Copyright � Lopez Eric 2001 .Ce logiciel est prot�g� par la loi ' + 'de la propri�t� Intellectuelle. ' 'Tous droits r�serv�s pour tous pays.' '' 'Note: cette version de NetOneEcole est GRATUITE donc en libre di' + 'ffusion.' '' 'Adresse: M. Lopez Eric e-mail: neto' + 'neecole@free.fr ' ' R�sidence Croix Daurade' ' 156 Bis route d'#39'Albi' ' 31200 TOULOUSE France' ' ') ParentCtl3D = False ParentFont = False ReadOnly = True TabOrder = 4 end object Panel2: TPanel Left = 0 Top = 64 Width = 457 Height = 225 BevelOuter = bvLowered TabOrder = 5 object Label5: TLabel Left = 0 Top = 8 Width = 459 Height = 33 Alignment = taCenter AutoSize = False Caption = 'Formulaire � compl�ter obligatoirement avant de proc�der � l'#39'ins' + 'tallation' Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Transparent = True WordWrap = True end object Label6: TLabel Left = 16 Top = 48 Width = 111 Height = 13 Caption = 'Nom de l'#39'�tablissement:' end object Label7: TLabel Left = 16 Top = 88 Width = 22 Height = 13 Caption = 'Ville:' end object Label9: TLabel Left = 312 Top = 88 Width = 41 Height = 13 Caption = 'N� RNE:' end object Label8: TLabel Left = 224 Top = 48 Width = 41 Height = 13 Caption = 'Adresse:' end object Label10: TLabel Left = 224 Top = 88 Width = 57 Height = 13 Caption = 'Code Postal' end object Label12: TLabel Left = 16 Top = 128 Width = 54 Height = 13 Caption = 'Telephone:' end object Label13: TLabel Left = 112 Top = 128 Width = 20 Height = 13 Caption = 'Fax:' end object Label14: TLabel Left = 208 Top = 128 Width = 30 Height = 13 Caption = 'e-mail:' end object ENom: TEdit Left = 16 Top = 64 Width = 193 Height = 21 TabOrder = 0 end object EVille: TEdit Left = 16 Top = 104 Width = 193 Height = 21 TabOrder = 2 end object ECode: TEdit Left = 224 Top = 104 Width = 73 Height = 21 MaxLength = 5 TabOrder = 3 end object EAdresse: TEdit Left = 224 Top = 64 Width = 217 Height = 21 TabOrder = 1 end object Button1: TButton Left = 180 Top = 176 Width = 97 Height = 33 Caption = 'Enregistrer' TabOrder = 8 OnClick = Button1Click end object ERNE: TEdit Left = 312 Top = 104 Width = 129 Height = 21 MaxLength = 9 TabOrder = 4 end object Ephone: TEdit Left = 16 Top = 144 Width = 81 Height = 21 MaxLength = 10 TabOrder = 5 end object Efax: TEdit Left = 112 Top = 144 Width = 81 Height = 21 MaxLength = 10 TabOrder = 6 end object EEmail: TEdit Left = 208 Top = 144 Width = 233 Height = 21 TabOrder = 7 end end object ButtonInfo: TButton Left = 16 Top = 208 Width = 121 Height = 17 Caption = 'Information' TabOrder = 6 Visible = False OnClick = ButtonInfoClick end object TimerAnalyse: TTimer Enabled = False Interval = 2000 OnTimer = TimerAnalyseTimer Left = 376 Top = 8 end object Timer1: TTimer OnTimer = Timer1Timer Left = 560 Top = 168 end end