home *** CD-ROM | disk | FTP | other *** search
- object FrmPMPrintPreview: TFrmPMPrintPreview
- Left = 231
- Top = 93
- Width = 677
- Height = 575
- Caption = 'FrmPMPrintPreview'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 14
- Font.Name = 'Arial'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 14
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 669
- Height = 49
- Align = alTop
- TabOrder = 0
- object LblPage: TLabel
- Left = 360
- Top = 8
- Width = 105
- Height = 17
- AutoSize = False
- Caption = 'Page 100 of 1000'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BtnMargins: TSpeedButton
- Left = 184
- Top = 8
- Width = 89
- Height = 33
- AllowAllUp = True
- GroupIndex = 1
- Caption = '&Margins'
- OnClick = BtnMarginsClick
- end
- object Label1: TLabel
- Left = 360
- Top = 32
- Width = 30
- Height = 14
- Caption = 'Michal'
- end
- object BtnPrint: TButton
- Left = 8
- Top = 8
- Width = 81
- Height = 33
- Caption = '&Print'
- ModalResult = 6
- TabOrder = 0
- OnClick = BtnPrintClick
- end
- object BtnPrinterSetup: TButton
- Left = 88
- Top = 8
- Width = 89
- Height = 33
- Caption = 'Print &Setup...'
- TabOrder = 1
- OnClick = BtnPrinterSetupClick
- end
- object BtnClose: TBitBtn
- Left = 464
- Top = 8
- Width = 81
- Height = 33
- Caption = '&Close'
- ModalResult = 2
- TabOrder = 2
- Glyph.Data = {
- DE010000424DDE01000000000000760000002800000024000000120000000100
- 0400000000006801000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
- F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
- 000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
- 338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
- 45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
- 3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
- F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
- 000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
- 338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
- 4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
- 8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
- 333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
- 0000}
- NumGlyphs = 2
- end
- object BtnNextPage: TBitBtn
- Left = 288
- Top = 11
- Width = 33
- Height = 25
- Hint = 'Next page'
- TabOrder = 3
- OnClick = BtnNextPageClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
- 333333333337F33333333333333033333333333333373F333333333333090333
- 33333333337F7F33333333333309033333333333337373F33333333330999033
- 3333333337F337F33333333330999033333333333733373F3333333309999903
- 333333337F33337F33333333099999033333333373333373F333333099999990
- 33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333300033333333333337773333333}
- NumGlyphs = 2
- end
- object BtnPrevious: TBitBtn
- Left = 320
- Top = 11
- Width = 33
- Height = 25
- Hint = 'Previous page'
- Enabled = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = BtnPreviousClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
- 3333333333777F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
- 3333333777737777F333333099999990333333373F3333373333333309999903
- 333333337F33337F33333333099999033333333373F333733333333330999033
- 3333333337F337F3333333333099903333333333373F37333333333333090333
- 33333333337F7F33333333333309033333333333337373333333333333303333
- 333333333337F333333333333330333333333333333733333333}
- NumGlyphs = 2
- end
- object cbZoom: TComboBox
- Left = 560
- Top = 8
- Width = 97
- Height = 22
- Style = csDropDownList
- ItemHeight = 14
- TabOrder = 5
- OnChange = cbZoomChange
- OnClick = cbZoomChange
- Items.Strings = (
- '500%'
- '200%'
- '150%'
- '100%'
- '75%'
- '50%'
- 'Page width'
- 'Whole page')
- end
- end
- object sbPreview: TScrollBox
- Left = 0
- Top = 49
- Width = 669
- Height = 499
- HorzScrollBar.Margin = 10
- HorzScrollBar.Tracking = True
- VertScrollBar.Margin = 10
- VertScrollBar.Tracking = True
- Align = alClient
- Color = clGray
- ParentColor = False
- TabOrder = 1
- OnResize = sbPreviewResize
- object PBPreview: TPaintBox
- Left = 188
- Top = 16
- Width = 321
- Height = 345
- Color = clWhite
- ParentColor = False
- OnMouseDown = PBPreviewMouseDown
- OnMouseMove = PBPreviewMouseMove
- OnMouseUp = PBPreviewMouseUp
- OnPaint = PBPreviewPaint
- end
- end
- end
-