home *** CD-ROM | disk | FTP | other *** search
- object frmPrintDialog: TfrmPrintDialog
- Left = 412
- Top = 125
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsDialog
- Caption = 'frmPrintDialog'
- ClientHeight = 312
- ClientWidth = 430
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object gbControls: TGroupBox
- Left = 0
- Top = 0
- Width = 430
- Height = 312
- Align = alClient
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object lblInfo: TLabel
- Left = 56
- Top = 18
- Width = 83
- Height = 24
- Caption = 'Printing ...'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -20
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object imgPrint: TImage
- Left = 8
- Top = 13
- Width = 33
- Height = 33
- Picture.Data = {<image000.ico>}
- Transparent = True
- end
- object rgPrintTo: TRadioGroup
- Left = 6
- Top = 48
- Width = 417
- Height = 105
- ItemIndex = 0
- Items.Strings = (
- 'Printer:'
- 'Normal TXT - file:'
- 'HTML document:')
- TabOrder = 0
- OnClick = rgPrintToClick
- end
- object cbPrinters: TComboBox
- Left = 88
- Top = 64
- Width = 321
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- end
- object eTxtFilePath: TEdit
- Left = 136
- Top = 94
- Width = 241
- Height = 21
- TabStop = False
- Enabled = False
- TabOrder = 7
- Text = 'C:\'
- end
- object eHtmlFilePath: TEdit
- Left = 136
- Top = 124
- Width = 241
- Height = 21
- TabStop = False
- Enabled = False
- TabOrder = 8
- Text = 'C:\'
- end
- object btnTxtPath: TButton
- Left = 384
- Top = 94
- Width = 25
- Height = 21
- Caption = '...'
- Enabled = False
- TabOrder = 2
- OnClick = btnTxtPathClick
- end
- object btnHtmlPath: TButton
- Left = 384
- Top = 124
- Width = 25
- Height = 21
- Caption = '...'
- Enabled = False
- TabOrder = 3
- OnClick = btnHtmlPathClick
- end
- object btnPrint: TButton
- Left = 244
- Top = 280
- Width = 85
- Height = 25
- Caption = 'btnPrint'
- Default = True
- TabOrder = 5
- OnClick = btnPrintClick
- end
- object btnCancel: TButton
- Left = 336
- Top = 280
- Width = 85
- Height = 25
- Cancel = True
- Caption = 'btnCancel'
- TabOrder = 6
- OnClick = btnCancelClick
- end
- object gbOptions: TGroupBox
- Left = 6
- Top = 160
- Width = 417
- Height = 113
- Caption = 'gbOptions '
- TabOrder = 4
- object lNumberCopies: TLabel
- Left = 8
- Top = 60
- Width = 71
- Height = 13
- Caption = 'lNumberCopies'
- end
- object lColumns: TLabel
- Left = 192
- Top = 16
- Width = 42
- Height = 13
- Alignment = taRightJustify
- Caption = 'lColumns'
- end
- object cbIncludeArchiveComment: TCheckBox
- Left = 8
- Top = 32
- Width = 145
- Height = 17
- Caption = 'cbIncludeArchiveComment'
- Checked = True
- State = cbChecked
- TabOrder = 0
- end
- object eCopies: TEdit
- Left = 120
- Top = 56
- Width = 20
- Height = 21
- TabStop = False
- ReadOnly = True
- TabOrder = 1
- Text = '1'
- end
- object UpDown1: TUpDown
- Left = 140
- Top = 56
- Width = 15
- Height = 21
- Associate = eCopies
- Min = 1
- Position = 1
- TabOrder = 2
- TabStop = True
- Wrap = False
- end
- object clbPrintColumns: TCheckListBox
- Left = 192
- Top = 32
- Width = 217
- Height = 65
- BiDiMode = bdLeftToRight
- Columns = 3
- ItemHeight = 13
- ParentBiDiMode = False
- TabOrder = 3
- end
- end
- end
- object dfsBrowseDir: TdfsBrowseDirectoryDlg
- Selection = 'C:\Temp\'
- Options = [bfDirectoriesOnly]
- ShowSelectionInStatus = False
- Left = 264
- Top = 104
- end
- end
-