home *** CD-ROM | disk | FTP | other *** search
- object PageSetupForm: TPageSetupForm
- Left = 266
- Top = 160
- BorderStyle = bsDialog
- Caption = 'Page Setup'
- ClientHeight = 443
- ClientWidth = 485
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object PageMarginGroup: TGroupBox
- Left = 8
- Top = 60
- Width = 161
- Height = 117
- Caption = 'Page Margins'
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 16
- Width = 18
- Height = 13
- Caption = '&Left'
- FocusControl = LeftEdit
- end
- object Label2: TLabel
- Left = 84
- Top = 16
- Width = 25
- Height = 13
- Caption = '&Right'
- FocusControl = RightEdit
- end
- object Label3: TLabel
- Left = 8
- Top = 64
- Width = 19
- Height = 13
- Caption = '&Top'
- FocusControl = TopEdit
- end
- object Label4: TLabel
- Left = 84
- Top = 64
- Width = 33
- Height = 13
- Caption = '&Bottom'
- FocusControl = BotEdit
- end
- object LeftEdit: TEdit
- Left = 8
- Top = 36
- Width = 65
- Height = 21
- TabOrder = 0
- end
- object RightEdit: TEdit
- Left = 84
- Top = 36
- Width = 65
- Height = 21
- TabOrder = 1
- end
- object TopEdit: TEdit
- Left = 8
- Top = 80
- Width = 65
- Height = 21
- TabOrder = 2
- end
- object BotEdit: TEdit
- Left = 84
- Top = 80
- Width = 65
- Height = 21
- TabOrder = 3
- end
- end
- object PageOrientGroup: TGroupBox
- Left = 176
- Top = 8
- Width = 109
- Height = 169
- Caption = 'Page Orientation'
- TabOrder = 2
- object PortShape: TShape
- Left = 24
- Top = 72
- Width = 56
- Height = 73
- end
- object LandShape: TShape
- Left = 16
- Top = 80
- Width = 73
- Height = 56
- Visible = False
- end
- object PortBut: TRadioButton
- Left = 14
- Top = 20
- Width = 85
- Height = 17
- Caption = '&Portrait'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = OrientationClick
- end
- object LandBut: TRadioButton
- Tag = 1
- Left = 14
- Top = 36
- Width = 85
- Height = 17
- Caption = 'Land&scape'
- TabOrder = 1
- OnClick = OrientationClick
- end
- end
- object OKBut: TBitBtn
- Left = 157
- Top = 412
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 8
- OnClick = OKButClick
- end
- object CancelBut: TBitBtn
- Left = 253
- Top = 412
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 9
- end
- object HeaderGroup: TGroupBox
- Left = 8
- Top = 184
- Width = 277
- Height = 105
- Caption = 'Header Options'
- TabOrder = 4
- object Label5: TLabel
- Left = 8
- Top = 24
- Width = 35
- Height = 13
- Caption = '&Header'
- FocusControl = HeaderEdit
- end
- object Label6: TLabel
- Left = 8
- Top = 55
- Width = 32
- Height = 13
- Caption = '&Margin'
- FocusControl = HdrMarginEdit
- end
- object HeaderEdit: TEdit
- Left = 48
- Top = 20
- Width = 165
- Height = 21
- TabOrder = 0
- end
- object HdrMarginEdit: TEdit
- Left = 8
- Top = 71
- Width = 45
- Height = 21
- TabOrder = 1
- end
- object HdrLeftBut: TRadioButton
- Left = 64
- Top = 48
- Width = 60
- Height = 17
- Caption = 'Left'
- TabOrder = 2
- end
- object HdrCenterBut: TRadioButton
- Tag = 2
- Left = 64
- Top = 64
- Width = 60
- Height = 17
- Caption = 'Center'
- Checked = True
- TabOrder = 3
- TabStop = True
- end
- object HdrRightBut: TRadioButton
- Tag = 1
- Left = 64
- Top = 80
- Width = 60
- Height = 17
- Caption = 'Right'
- TabOrder = 4
- end
- object HdrFontBut: TBitBtn
- Left = 132
- Top = 61
- Width = 136
- Height = 25
- Caption = '&Font...'
- TabOrder = 5
- OnClick = HdrFontButClick
- end
- end
- object FooterGroup: TGroupBox
- Left = 8
- Top = 296
- Width = 277
- Height = 105
- Caption = 'Footer Options'
- TabOrder = 5
- object Label7: TLabel
- Left = 8
- Top = 24
- Width = 30
- Height = 13
- Caption = '&Footer'
- FocusControl = FooterEdit
- end
- object Label8: TLabel
- Left = 8
- Top = 55
- Width = 32
- Height = 13
- Caption = '&Margin'
- FocusControl = FtrMarginEdit
- end
- object FooterEdit: TEdit
- Left = 48
- Top = 20
- Width = 165
- Height = 21
- TabOrder = 0
- end
- object FtrMarginEdit: TEdit
- Left = 8
- Top = 71
- Width = 45
- Height = 21
- TabOrder = 1
- end
- object FtrLeftBut: TRadioButton
- Left = 64
- Top = 48
- Width = 60
- Height = 17
- Caption = 'Left'
- TabOrder = 2
- end
- object FtrCenterBut: TRadioButton
- Tag = 2
- Left = 64
- Top = 64
- Width = 60
- Height = 17
- Caption = 'Center'
- Checked = True
- TabOrder = 3
- TabStop = True
- end
- object FtrRightBut: TRadioButton
- Tag = 1
- Left = 64
- Top = 80
- Width = 60
- Height = 17
- Caption = 'Right'
- TabOrder = 4
- end
- object FtrFontBut: TBitBtn
- Left = 132
- Top = 61
- Width = 136
- Height = 25
- Caption = '&Font...'
- TabOrder = 5
- OnClick = FtrFontButClick
- end
- end
- object PageNumGroup: TGroupBox
- Left = 292
- Top = 8
- Width = 185
- Height = 169
- Caption = 'Page Number Options'
- TabOrder = 3
- object Label9: TLabel
- Left = 16
- Top = 88
- Width = 149
- Height = 13
- Caption = 'Page &Number Text (%d = Page)'
- FocusControl = PageNumEdit
- end
- object Panel1: TPanel
- Left = 8
- Top = 24
- Width = 81
- Height = 57
- BevelOuter = bvNone
- TabOrder = 0
- object PageBotBut: TRadioButton
- Left = 8
- Top = 4
- Width = 65
- Height = 17
- Caption = 'Bottom'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object PageTopBut: TRadioButton
- Tag = 1
- Left = 8
- Top = 20
- Width = 65
- Height = 17
- Caption = 'Top'
- TabOrder = 1
- end
- object PageNoneBut: TRadioButton
- Tag = 2
- Left = 8
- Top = 36
- Width = 65
- Height = 17
- Caption = 'None'
- TabOrder = 2
- end
- end
- object Panel2: TPanel
- Left = 88
- Top = 24
- Width = 81
- Height = 57
- BevelOuter = bvNone
- TabOrder = 1
- object PageLeftBut: TRadioButton
- Left = 20
- Top = 4
- Width = 65
- Height = 17
- Caption = 'Left'
- TabOrder = 0
- end
- object PageCenterBut: TRadioButton
- Tag = 2
- Left = 20
- Top = 20
- Width = 65
- Height = 17
- Caption = 'Center'
- TabOrder = 1
- end
- object PageRightBut: TRadioButton
- Tag = 1
- Left = 20
- Top = 36
- Width = 65
- Height = 17
- Caption = 'Right'
- Checked = True
- TabOrder = 2
- TabStop = True
- end
- end
- object PageNumEdit: TEdit
- Left = 16
- Top = 104
- Width = 153
- Height = 21
- TabOrder = 2
- end
- object PageNumFontBut: TBitBtn
- Left = 20
- Top = 135
- Width = 136
- Height = 25
- Caption = '&Font...'
- TabOrder = 3
- OnClick = PageNumFontButClick
- end
- end
- object PrinterSetupBut: TBitBtn
- Left = 364
- Top = 412
- Width = 105
- Height = 25
- Caption = 'Printer &Setup...'
- TabOrder = 7
- OnClick = PrinterSetupButClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
- 0003377777777777777308888888888888807F33333333333337088888888888
- 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
- 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
- 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
- 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
- 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
- 33333337FFFF7733333333300000033333333337777773333333}
- NumGlyphs = 2
- end
- object ElementGroup: TGroupBox
- Left = 296
- Top = 184
- Width = 181
- Height = 217
- Caption = 'Elements'
- TabOrder = 6
- object Label10: TLabel
- Left = 8
- Top = 60
- Width = 27
- Height = 13
- Caption = '&Rows'
- FocusControl = RowsEdit
- end
- object Label11: TLabel
- Left = 88
- Top = 60
- Width = 40
- Height = 13
- Caption = '&Columns'
- FocusControl = ColumnsEdit
- end
- object Label12: TLabel
- Left = 8
- Top = 104
- Width = 64
- Height = 13
- Caption = 'Row &Spacing'
- end
- object Label13: TLabel
- Left = 88
- Top = 104
- Width = 77
- Height = 13
- Caption = 'Co&lumn Spacing'
- end
- object Label14: TLabel
- Left = 88
- Top = 16
- Width = 28
- Height = 13
- Caption = '&Width'
- FocusControl = WidthEdit
- end
- object Label15: TLabel
- Left = 8
- Top = 16
- Width = 31
- Height = 13
- Caption = '&Height'
- FocusControl = HeightEdit
- end
- object Label16: TLabel
- Left = 8
- Top = 156
- Width = 62
- Height = 13
- Caption = '&Border Width'
- FocusControl = BorderEdit
- end
- object RowsEdit: TEdit
- Left = 8
- Top = 76
- Width = 65
- Height = 21
- TabOrder = 1
- end
- object RowSpaceEdit: TEdit
- Left = 8
- Top = 120
- Width = 65
- Height = 21
- TabOrder = 2
- end
- object ColumnsEdit: TEdit
- Left = 88
- Top = 76
- Width = 65
- Height = 21
- TabOrder = 4
- end
- object ColumnSpaceEdit: TEdit
- Left = 88
- Top = 120
- Width = 65
- Height = 21
- TabOrder = 5
- end
- object WidthEdit: TEdit
- Left = 88
- Top = 32
- Width = 65
- Height = 21
- TabOrder = 3
- end
- object HeightEdit: TEdit
- Left = 8
- Top = 32
- Width = 65
- Height = 21
- TabOrder = 0
- end
- object BorderEdit: TEdit
- Left = 88
- Top = 152
- Width = 65
- Height = 21
- TabOrder = 6
- end
- object CropMarksCheck: TCheckBox
- Left = 8
- Top = 188
- Width = 97
- Height = 17
- Caption = 'Print Crop &Marks'
- TabOrder = 7
- end
- end
- object UnitsGroup: TGroupBox
- Left = 8
- Top = 8
- Width = 161
- Height = 45
- Caption = 'Units'
- TabOrder = 0
- object InchBut: TRadioButton
- Left = 8
- Top = 20
- Width = 57
- Height = 17
- Caption = '&Inch'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object CentBut: TRadioButton
- Tag = 1
- Left = 68
- Top = 20
- Width = 89
- Height = 17
- Caption = '&Centimeters'
- TabOrder = 1
- end
- end
- object PrinterSetupDialog1: TPrinterSetupDialog
- Left = 68
- Top = 412
- end
- object FooterFontDialog: TFontDialog
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 132
- Top = 368
- end
- object HeaderFontDialog: TFontDialog
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 136
- Top = 256
- end
- object PageNumFontDialog: TFontDialog
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 296
- Top = 140
- end
- end
-