home *** CD-ROM | disk | FTP | other *** search
- object WinConfig: TWinConfig
- Left = 188
- Top = 72
- BorderStyle = bsDialog
- Caption = 'Configuration'
- ClientHeight = 424
- ClientWidth = 408
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnActivate = FormActivate
- OnCloseQuery = FormCloseQuery
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 408
- Height = 176
- TabOrder = 0
- object LblTBarX: TLabel
- Left = 16
- Top = 84
- Width = 105
- Height = 13
- Caption = '&Horizontal graduations'
- FocusControl = TBarX
- end
- object LblTBarY: TLabel
- Left = 18
- Top = 132
- Width = 93
- Height = 13
- Caption = '&Vertical graduations'
- FocusControl = TBarY
- end
- object Label3: TLabel
- Left = 258
- Top = 157
- Width = 6
- Height = 13
- Caption = '0'
- end
- object Label4: TLabel
- Left = 372
- Top = 157
- Width = 20
- Height = 13
- Caption = '+1%'
- end
- object Label5: TLabel
- Left = 133
- Top = 157
- Width = 17
- Height = 13
- Caption = '-1%'
- end
- object Label6: TLabel
- Left = 309
- Top = 157
- Width = 29
- Height = 13
- Caption = '+0.5%'
- end
- object Label7: TLabel
- Left = 190
- Top = 157
- Width = 26
- Height = 13
- Caption = '-0.5%'
- end
- object Label1: TLabel
- Left = 133
- Top = 109
- Width = 17
- Height = 13
- Caption = '-1%'
- end
- object Label2: TLabel
- Left = 190
- Top = 109
- Width = 26
- Height = 13
- Caption = '-0.5%'
- end
- object Label8: TLabel
- Left = 257
- Top = 109
- Width = 6
- Height = 13
- Caption = '0'
- end
- object Label9: TLabel
- Left = 307
- Top = 109
- Width = 29
- Height = 13
- Caption = '+0.5%'
- end
- object Label10: TLabel
- Left = 373
- Top = 109
- Width = 20
- Height = 13
- Caption = '+1%'
- end
- object Shape1: TShape
- Left = 54
- Top = 30
- Width = 302
- Height = 41
- Brush.Color = clInfoBk
- end
- object Label11: TLabel
- Left = 59
- Top = 36
- Width = 251
- Height = 13
- Caption = 'Graduations are not very accurate with some printers.'
- Transparent = True
- end
- object Label12: TLabel
- Left = 59
- Top = 52
- Width = 292
- Height = 13
- Caption =
- 'Select the correction factors to get divisions with exact length' +
- '.'
- Transparent = True
- end
- object Label22: TLabel
- Left = 10
- Top = 7
- Width = 58
- Height = 16
- Caption = 'Accuracy'
- Font.Charset = ANSI_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- end
- object TBarX: TTrackBar
- Left = 128
- Top = 81
- Width = 265
- Height = 28
- Min = -10
- Orientation = trHorizontal
- PageSize = 5
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- end
- object TBarY: TTrackBar
- Left = 128
- Top = 129
- Width = 265
- Height = 27
- Min = -10
- Orientation = trHorizontal
- PageSize = 5
- Frequency = 1
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 383
- Width = 408
- Height = 41
- TabOrder = 1
- object BtOK: TBitBtn
- Left = 64
- Top = 8
- Width = 76
- Height = 25
- TabOrder = 0
- TabStop = False
- Kind = bkOK
- end
- object BitBtn2: TBitBtn
- Left = 176
- Top = 8
- Width = 75
- Height = 25
- TabOrder = 1
- TabStop = False
- Kind = bkCancel
- end
- object BtUndo: TButton
- Left = 288
- Top = 8
- Width = 75
- Height = 25
- Caption = '&Undo'
- TabOrder = 2
- TabStop = False
- OnClick = FormActivate
- end
- end
- object Panel5: TPanel
- Left = 0
- Top = 176
- Width = 408
- Height = 174
- TabOrder = 2
- object Label13: TLabel
- Left = 89
- Top = 84
- Width = 127
- Height = 13
- Caption = '10 &subdivisions if division >'
- FocusControl = Edit10
- end
- object LblUnit1: TLabel
- Left = 305
- Top = 85
- Width = 14
- Height = 13
- Caption = 'cm'
- end
- object Label15: TLabel
- Left = 89
- Top = 114
- Width = 121
- Height = 13
- Caption = '5 su&bdivisions if division >'
- FocusControl = Edit5
- end
- object LblUnit2: TLabel
- Left = 305
- Top = 115
- Width = 14
- Height = 13
- Caption = 'cm'
- end
- object Label18: TLabel
- Left = 89
- Top = 144
- Width = 121
- Height = 13
- Caption = '2 sub&divisions if division >'
- FocusControl = Edit2
- end
- object LblUnit3: TLabel
- Left = 305
- Top = 145
- Width = 14
- Height = 13
- Caption = 'cm'
- end
- object Shape3: TShape
- Left = 41
- Top = 30
- Width = 326
- Height = 41
- Brush.Color = clInfoBk
- end
- object Label20: TLabel
- Left = 46
- Top = 36
- Width = 313
- Height = 13
- Caption =
- 'In non linear scales, the axis range is divided in unequal int' +
- 'ervals.'
- Transparent = True
- end
- object Label21: TLabel
- Left = 46
- Top = 52
- Width = 279
- Height = 13
- Caption = 'The largest divisions can be subdivided by subdiision lines :'
- Transparent = True
- end
- object Label17: TLabel
- Left = 10
- Top = 7
- Width = 80
- Height = 16
- Caption = 'Subdivisions'
- Font.Charset = ANSI_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- end
- object Edit10: TEdit
- Left = 225
- Top = 81
- Width = 74
- Height = 21
- TabOrder = 0
- end
- object Edit5: TEdit
- Left = 225
- Top = 111
- Width = 74
- Height = 21
- TabOrder = 1
- end
- object Edit2: TEdit
- Left = 225
- Top = 141
- Width = 74
- Height = 21
- TabOrder = 2
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 350
- Width = 408
- Height = 33
- TabOrder = 3
- object Label23: TLabel
- Left = 11
- Top = 8
- Width = 72
- Height = 16
- Caption = 'Unit system'
- Font.Charset = ANSI_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsUnderline]
- ParentFont = False
- end
- object RBImperial: TRadioButton
- Left = 184
- Top = 8
- Width = 57
- Height = 17
- Caption = '&Imperial'
- TabOrder = 0
- OnClick = RBSystChange
- end
- object RBMetric: TRadioButton
- Left = 104
- Top = 8
- Width = 57
- Height = 17
- Caption = '&Metric'
- TabOrder = 1
- OnClick = RBSystChange
- end
- end
- end
-