1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109
|
object Form16: TForm16
Left = 818
Height = 371
Top = 389
Width = 622
BorderIcons = []
BorderStyle = bsDialog
Caption = 'Configuration primaire d''OptGeo'
ClientHeight = 371
ClientWidth = 622
Color = clAqua
OnCreate = FormCreate
OnShow = FormShow
LCLVersion = '0.9.30.2'
object GroupBox1: TGroupBox
Left = 16
Height = 57
Top = 8
Width = 577
Caption = 'Répertoire d''installation d''OptGeo'
ClientHeight = 39
ClientWidth = 573
TabOrder = 0
object rep1: TEdit
Left = 20
Height = 21
Top = 8
Width = 500
ReadOnly = True
TabOrder = 0
end
end
object GroupBox2: TGroupBox
Left = 16
Height = 57
Top = 80
Width = 576
Caption = 'Répertoire des exemples'
ClientHeight = 39
ClientWidth = 572
TabOrder = 1
object DirectoryEdit1: TDirectoryEdit
Left = 20
Height = 21
Top = 10
Width = 500
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 0
MaxLength = 0
TabOrder = 0
end
end
object GroupBox3: TGroupBox
Left = 16
Height = 65
Top = 224
Width = 577
Caption = 'Répertoire devant recevoir vos simulations personnelles'
ClientHeight = 47
ClientWidth = 573
TabOrder = 2
object DirectoryEdit3: TDirectoryEdit
Left = 20
Height = 21
Top = 8
Width = 500
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 0
MaxLength = 0
TabOrder = 0
end
end
object GroupBox4: TGroupBox
Left = 15
Height = 57
Top = 152
Width = 577
Caption = 'Répertoire devant contenir votre configuration personnelle d''OptGeo'
ClientHeight = 39
ClientWidth = 573
TabOrder = 3
object DirectoryEdit2: TDirectoryEdit
Left = 20
Height = 21
Top = 8
Width = 500
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 0
MaxLength = 0
TabOrder = 0
end
end
object BitBtn1: TBitBtn
Left = 16
Height = 60
Top = 300
Width = 577
Caption = '&OK'
Default = True
Kind = bkOK
ModalResult = 1
NumGlyphs = 0
OnClick = BitBtn1Click
TabOrder = 4
end
end
|