File: saisienor.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 (165 lines) | stat: -rw-r--r-- 3,971 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
object saisienormale: Tsaisienormale
  Left = 200
  Height = 340
  Top = 108
  Width = 498
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Options pour le tracé des normales aux dioptres et miroirs'
  ClientHeight = 340
  ClientWidth = 498
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object GroupBox1: TGroupBox
    Left = 184
    Height = 89
    Top = 0
    Width = 193
    Caption = 'Tracer les normales'
    ClientHeight = 67
    ClientWidth = 189
    TabOrder = 0
    object checknormale: TCheckBox
      AnchorSideLeft.Control = GroupBox1
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox1
      AnchorSideTop.Side = asrCenter
      Left = 63
      Height = 21
      Top = 23
      Width = 63
      Caption = 'Tracer'
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    Left = 184
    Height = 73
    Top = 96
    Width = 193
    Caption = 'Epaisseur de la trace'
    ClientHeight = 51
    ClientWidth = 189
    TabOrder = 1
    object spinepaisseur: TSpinEdit
      AnchorSideLeft.Control = GroupBox2
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox2
      AnchorSideTop.Side = asrCenter
      Left = 74
      Height = 25
      Top = 13
      Width = 41
      MaxValue = 10
      MinValue = 1
      TabOrder = 0
      Value = 1
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Height = 169
    Top = 0
    Width = 169
    Caption = 'Couleur de la trace'
    ClientHeight = 147
    ClientWidth = 165
    TabOrder = 2
    object ColorGrid1: TColorBox
      AnchorSideLeft.Control = GroupBox3
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 21
      Height = 22
      Top = 62
      Width = 123
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object GroupBox4: TGroupBox
    AnchorSideTop.Control = GroupBox5
    AnchorSideTop.Side = asrBottom
    Left = 8
    Height = 65
    Top = 251
    Width = 465
    BorderSpacing.Top = 10
    Caption = 'Longueur trace (en % de la diagonale de l''espace de travail)'
    ClientHeight = 43
    ClientWidth = 461
    TabOrder = 3
    object spinpourcentage: TSpinEdit
      AnchorSideLeft.Control = GroupBox4
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox4
      AnchorSideTop.Side = asrCenter
      Left = 210
      Height = 25
      Top = 9
      Width = 41
      MinValue = 1
      TabOrder = 0
      Value = 5
    end
  end
  object GroupBox5: TGroupBox
    Left = 8
    Height = 65
    Top = 176
    Width = 368
    Caption = 'Afficher valeurs angles (en degrés)'
    ClientHeight = 43
    ClientWidth = 364
    TabOrder = 4
    object StaticText1: TLabel
      AnchorSideLeft.Control = checkangles
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = checkangles
      AnchorSideTop.Side = asrCenter
      Left = 95
      Height = 17
      Top = 7
      Width = 135
      BorderSpacing.Left = 10
      Caption = 'Nombre de décimales:'
      ParentColor = False
    end
    object checkangles: TCheckBox
      Left = 16
      Height = 21
      Top = 5
      Width = 69
      Caption = 'Afficher'
      TabOrder = 0
    end
    object spindecimalesangles: TSpinEdit
      AnchorSideLeft.Control = StaticText1
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText1
      AnchorSideTop.Side = asrCenter
      Left = 240
      Height = 25
      Top = 3
      Width = 41
      BorderSpacing.Left = 10
      MaxValue = 8
      TabOrder = 1
    end
  end
  object BitBtn1: TBitBtn
    Left = 384
    Height = 240
    Top = 8
    Width = 94
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 5
  end
end