File: Unit16.lfm

package info (click to toggle)
optgeo 2.23-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 7,180 kB
  • ctags: 2,773
  • sloc: pascal: 58,720; makefile: 102; xml: 63
file content (109 lines) | stat: -rwxr-xr-x 2,325 bytes parent folder | download | duplicates (3)
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