File: Unit3.lfm

package info (click to toggle)
optgeo 2.25-2
  • links: PTS
  • area: main
  • in suites: bookworm, bullseye
  • size: 6,960 kB
  • sloc: pascal: 58,875; xml: 63; makefile: 58
file content (164 lines) | stat: -rw-r--r-- 3,766 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
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
object proprietespoints: Tproprietespoints
  Left = 200
  Height = 323
  Top = 108
  Width = 321
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Propriétés des points'
  ClientHeight = 323
  ClientWidth = 321
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object RadioGroup1: TRadioGroup
    Left = 16
    Height = 155
    Top = 8
    Width = 138
    AutoFill = True
    Caption = 'Style des points'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    TabOrder = 0
  end
  object radiocroixx: TRadioButton
    Left = 24
    Height = 21
    Top = 32
    Width = 107
    Caption = 'Croix  oblique'
    TabOrder = 1
  end
  object radiocroixp: TRadioButton
    Left = 24
    Height = 21
    Top = 64
    Width = 95
    Caption = 'Croix droite'
    TabOrder = 2
  end
  object radiodisque: TRadioButton
    Left = 24
    Height = 21
    Top = 96
    Width = 65
    Caption = 'Disque'
    TabOrder = 3
  end
  object GroupBox1: TGroupBox
    Left = 176
    Height = 65
    Top = 8
    Width = 129
    Caption = 'Taille des points'
    ClientHeight = 43
    ClientWidth = 125
    TabOrder = 4
    object editeurtaillepoints: TSpinEdit
      AnchorSideLeft.Control = GroupBox1
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox1
      AnchorSideTop.Side = asrCenter
      Left = 42
      Height = 25
      Top = 9
      Width = 41
      MaxValue = 20
      MinValue = 1
      TabOrder = 0
      Value = 1
    end
  end
  object GroupBox2: TGroupBox
    AnchorSideTop.Control = RadioGroup1
    AnchorSideTop.Side = asrBottom
    Left = 16
    Height = 137
    Top = 173
    Width = 137
    BorderSpacing.Top = 10
    Caption = 'Couleur des points'
    ClientHeight = 115
    ClientWidth = 133
    TabOrder = 5
    object ColorGrid1: TColorBox
      Left = 20
      Height = 22
      Top = 36
      Width = 83
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object radiocercle: TRadioButton
    Left = 24
    Height = 21
    Top = 128
    Width = 61
    Caption = 'Cercle'
    TabOrder = 6
  end
  object GroupBox3: TGroupBox
    Left = 176
    Height = 57
    Top = 80
    Width = 128
    Caption = 'Point courant'
    ClientHeight = 35
    ClientWidth = 124
    TabOrder = 7
    object casereperer: TCheckBox
      AnchorSideLeft.Control = GroupBox3
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 26
      Height = 21
      Top = 7
      Width = 72
      Caption = 'Repérer'
      TabOrder = 0
    end
  end
  object GroupBox4: TGroupBox
    Left = 176
    Height = 65
    Top = 152
    Width = 128
    Caption = 'Grille de repérage'
    ClientHeight = 43
    ClientWidth = 124
    TabOrder = 8
    object cochetracergrille: TCheckBox
      AnchorSideLeft.Control = GroupBox4
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox4
      AnchorSideTop.Side = asrCenter
      Left = 31
      Height = 21
      Top = 11
      Width = 63
      Caption = 'Tracer'
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 176
    Height = 85
    Top = 225
    Width = 129
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    TabOrder = 9
  end
end