File: unit_imp.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 (229 lines) | stat: -rw-r--r-- 5,731 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
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
object configimpression: Tconfigimpression
  Left = 725
  Height = 502
  Top = 136
  Width = 441
  ActiveControl = spinpourcentagehorizontal
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Configuration de la page pour l''impression'
  ClientHeight = 502
  ClientWidth = 441
  Color = clAqua
  DesignTimePPI = 120
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.8.0.6'
  object GroupBox1: TGroupBox
    Left = 7
    Height = 313
    Top = 7
    Width = 153
    Caption = 'Position'
    ClientHeight = 288
    ClientWidth = 149
    TabOrder = 0
    object radiogroupehorizontal: TRadioGroup
      Left = 20
      Height = 126
      Top = 14
      Width = 111
      AutoFill = True
      Caption = 'Horizontale'
      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 = 101
      ClientWidth = 107
      ItemIndex = 2
      Items.Strings = (
        'Droite'
        'Gauche'
        'Centré'
      )
      TabOrder = 0
    end
    object RadioGroupevertical: TRadioGroup
      Left = 22
      Height = 138
      Top = 151
      Width = 105
      AutoFill = True
      Caption = 'Verticale'
      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 = 113
      ClientWidth = 101
      ItemIndex = 2
      Items.Strings = (
        'Haut'
        'Bas'
        'Centré'
      )
      TabOrder = 1
    end
  end
  object GroupBox2: TGroupBox
    Left = 7
    Height = 69
    Top = 327
    Width = 153
    Caption = 'Nombre de copies'
    ClientHeight = 44
    ClientWidth = 149
    TabOrder = 1
    object Label1: TLabel
      Left = 9
      Height = 20
      Top = 9
      Width = 58
      Caption = 'Nombre:'
      ParentColor = False
    end
    object Spinnombrecopies: TSpinEdit
      AnchorSideLeft.Control = Label1
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = Label1
      AnchorSideTop.Side = asrCenter
      Left = 77
      Height = 28
      Top = 5
      Width = 59
      BorderSpacing.Left = 10
      MinValue = 1
      TabOrder = 0
      Value = 1
    end
  end
  object GroupBox3: TGroupBox
    Left = 174
    Height = 106
    Top = 8
    Width = 250
    Caption = 'Taille (en % de la page)'
    ClientHeight = 81
    ClientWidth = 246
    TabOrder = 2
    object Label2: TLabel
      Left = 7
      Height = 20
      Top = 7
      Width = 112
      Caption = 'Horizontalement'
      ParentColor = False
    end
    object Label3: TLabel
      Left = 16
      Height = 20
      Top = 41
      Width = 91
      Caption = 'Verticalement'
      ParentColor = False
    end
    object spinpourcentagehorizontal: TSpinEdit
      AnchorSideLeft.Control = Label2
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = Label2
      AnchorSideTop.Side = asrCenter
      Left = 129
      Height = 28
      Top = 3
      Width = 57
      BorderSpacing.Left = 10
      TabOrder = 0
      Value = 100
    end
    object spinpourcentagevertical: TSpinEdit
      AnchorSideLeft.Control = Label3
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = Label3
      AnchorSideTop.Side = asrCenter
      Left = 117
      Height = 28
      Top = 37
      Width = 57
      BorderSpacing.Left = 10
      TabOrder = 1
      Value = 100
    end
  end
  object RadioGrouporientation: TRadioGroup
    Left = 175
    Height = 86
    Top = 123
    Width = 249
    AutoFill = True
    Caption = 'Orientation'
    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 = 61
    ClientWidth = 245
    ItemIndex = 1
    Items.Strings = (
      'Portrait'
      'Paysage'
    )
    TabOrder = 3
  end
  object BitBtn1: TBitBtn
    Left = 174
    Height = 188
    Top = 304
    Width = 254
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 4
  end
  object BitBtn2: TBitBtn
    Left = 7
    Height = 84
    Top = 408
    Width = 153
    Cancel = True
    Caption = 'Annuler'
    Kind = bkCancel
    ModalResult = 2
    OnClick = BitBtn2Click
    TabOrder = 5
  end
  object GroupBox4: TGroupBox
    Left = 176
    Height = 73
    Top = 223
    Width = 254
    Caption = 'Rapport hauteur/largeur'
    ClientHeight = 48
    ClientWidth = 250
    TabOrder = 6
    object CheckBoxrespect: TCheckBox
      Left = 5
      Height = 24
      Top = 17
      Width = 253
      Caption = 'Respecter les angles à l''impression'
      Checked = True
      State = cbChecked
      TabOrder = 0
    end
  end
end