File: saisiech.lfm

package info (click to toggle)
optgeo 2.25-1
  • links: PTS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 6,948 kB
  • sloc: pascal: 58,877; xml: 63; makefile: 58
file content (166 lines) | stat: -rw-r--r-- 4,243 bytes parent folder | download
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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
object saisiechoix: Tsaisiechoix
  Left = 284
  Height = 328
  Top = 140
  Width = 915
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Que voulez vous faire ?'
  ClientHeight = 328
  ClientWidth = 915
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object StaticText2: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = radiochoix
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 17
    Top = 195
    Width = 532
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Vous pouvez changer les indices du milieu dans lequel s''effectue la simulation:'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object StaticText3: TLabel
    AnchorSideTop.Control = StaticText2
    AnchorSideTop.Side = asrBottom
    Left = 8
    Height = 17
    Top = 222
    Width = 85
    BorderSpacing.Top = 10
    Caption = 'Pour le vert:'
    Color = clGreen
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = False
  end
  object StaticText4: TLabel
    AnchorSideTop.Control = StaticText3
    AnchorSideTop.Side = asrBottom
    Left = 8
    Height = 17
    Top = 259
    Width = 98
    BorderSpacing.Top = 20
    Caption = 'Pour le rouge:'
    Color = clRed
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = False
  end
  object StaticText5: TLabel
    AnchorSideTop.Control = StaticText4
    AnchorSideTop.Side = asrBottom
    Left = 8
    Height = 17
    Top = 296
    Width = 86
    BorderSpacing.Top = 20
    Caption = 'Pour le bleu:'
    Color = clBlue
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Transparent = False
  end
  object radiochoix: TRadioGroup
    Left = 8
    Height = 177
    Top = 8
    Width = 689
    AutoFill = True
    Caption = 'Voulez vous:'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 155
    ClientWidth = 685
    Color = clAqua
    ItemIndex = 0
    Items.Strings = (
      'Créér une nouvelle simulation'
      'Créér une nouvelle simulation en choisissant les dimensions de l''espace de travail'
      'Ouvrir une simulation existante'
    )
    ParentFont = False
    ParentColor = False
    TabOrder = 0
  end
  object BitBtn1: TBitBtn
    AnchorSideLeft.Control = radiochoix
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 707
    Height = 308
    Top = 10
    Width = 198
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    BorderSpacing.Right = 10
    BorderSpacing.Bottom = 10
    Caption = 'Suivant >'
    Default = True
    Font.Style = [fsBold]
    ModalResult = 1
    NumGlyphs = 2
    ParentFont = False
    TabOrder = 1
  end
  object Edit_indice_vert_par_defaut: TEdit
    AnchorSideLeft.Control = StaticText3
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = StaticText3
    AnchorSideTop.Side = asrCenter
    Left = 103
    Height = 25
    Top = 218
    Width = 65
    BorderSpacing.Left = 10
    TabOrder = 2
    Text = '1'
  end
  object Edit_indice_rouge_par_defaut: TEdit
    AnchorSideLeft.Control = StaticText4
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = StaticText4
    AnchorSideTop.Side = asrCenter
    Left = 116
    Height = 25
    Top = 255
    Width = 65
    BorderSpacing.Left = 10
    TabOrder = 3
    Text = '1'
  end
  object Edit_indice_bleu_par_defaut: TEdit
    AnchorSideLeft.Control = StaticText5
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = StaticText5
    AnchorSideTop.Side = asrCenter
    Left = 104
    Height = 25
    Top = 292
    Width = 65
    BorderSpacing.Left = 10
    TabOrder = 4
    Text = '1'
  end
end