object IpHTMLPreview: TIpHTMLPreview Left = 196 Height = 338 Top = 103 Width = 558 ActiveControl = btnPrint Caption = 'Print preview' ClientHeight = 338 ClientWidth = 558 Font.Height = -11 Font.Name = 'MS Sans Serif' OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize OnShow = FormShow Position = poScreenCenter LCLVersion = '0.9.25' object Panel1: TPanel Height = 41 Width = 558 Align = alTop BevelOuter = bvLowered ClientHeight = 41 ClientWidth = 558 TabOrder = 0 object Label1: TLabel Left = 360 Height = 14 Top = 14 Width = 29 Caption = 'Page:' ParentColor = False end object Label2: TLabel Left = 440 Height = 14 Top = 14 Width = 10 Caption = 'of' ParentColor = False end object lblMaxPage: TLabel Left = 457 Height = 14 Top = 14 Width = 4 ParentColor = False end object Label3: TLabel Left = 96 Height = 14 Top = 16 Width = 31 Caption = 'Zoom:' ParentColor = False end object btnPrint: TButton Left = 8 Height = 25 Top = 8 Width = 75 Caption = 'Print' Default = True OnClick = btnPrintClick TabOrder = 0 end object btnFirst: TButton Left = 280 Height = 25 Top = 8 Width = 32 Caption = '<<' OnClick = btnFirstClick TabOrder = 1 end object btnPrev: TButton Left = 320 Height = 25 Top = 8 Width = 32 Caption = '<' OnClick = btnPrevClick TabOrder = 2 end object btnNext: TButton Left = 472 Height = 25 Top = 8 Width = 32 Caption = '>' OnClick = btnNextClick TabOrder = 4 end object btnLast: TButton Left = 512 Height = 25 Top = 8 Width = 32 Caption = '>>' OnClick = btnLastClick TabOrder = 5 end object btnClose: TButton Left = 200 Height = 25 Top = 8 Width = 75 Cancel = True Caption = 'Close' ModalResult = 2 TabOrder = 6 end object edtPage: TEdit Left = 400 Height = 21 Top = 10 Width = 32 OnChange = edtPageChange TabOrder = 3 Text = '1' end object ZoomCombo: TComboBox Left = 132 Height = 21 Top = 10 Width = 61 AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending] ItemHeight = 13 Items.Strings = ( '10%' '25%' '50%' '75%' '100%' '150%' '200%' '300%' '400%' ) MaxLength = 0 OnChange = ZoomComboChange Style = csDropDownList TabOrder = 7 end end object ScrollBox1: TScrollBox Height = 297 Top = 41 Width = 558 Align = alClient Color = clBtnFace ParentColor = False TabOrder = 1 object PaperPanel: TPanel Left = 16 Height = 153 Top = 8 Width = 185 BevelOuter = bvNone ClientHeight = 153 ClientWidth = 185 Color = clWhite ParentColor = False TabOrder = 0 object PaintBox1: TPaintBox Left = 16 Height = 113 Top = 24 Width = 145 OnPaint = PaintBox1Paint end end end end