mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-28 00:03:47 +02:00
257 lines
5.9 KiB
Plaintext
257 lines
5.9 KiB
Plaintext
object IpHTMLPreview: TIpHTMLPreview
|
|
Left = 274
|
|
Height = 372
|
|
Top = 141
|
|
Width = 645
|
|
Caption = 'Print preview'
|
|
ClientHeight = 372
|
|
ClientWidth = 645
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnResize = FormResize
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
LCLVersion = '0.9.29'
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 33
|
|
Top = 0
|
|
Width = 645
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 33
|
|
ClientWidth = 645
|
|
TabOrder = 0
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = btnPrev
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 398
|
|
Height = 14
|
|
Top = 9
|
|
Width = 29
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Page:'
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
AnchorSideLeft.Control = edtPage
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 469
|
|
Height = 14
|
|
Top = 9
|
|
Width = 10
|
|
BorderSpacing.Around = 5
|
|
Caption = 'of'
|
|
ParentColor = False
|
|
end
|
|
object lblMaxPage: TLabel
|
|
AnchorSideLeft.Control = Label2
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 484
|
|
Height = 1
|
|
Top = 16
|
|
Width = 1
|
|
BorderSpacing.Around = 5
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel
|
|
AnchorSideLeft.Control = btnSelectPrinter
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 159
|
|
Height = 14
|
|
Top = 9
|
|
Width = 31
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Zoom:'
|
|
ParentColor = False
|
|
end
|
|
object btnPrint: TButton
|
|
Left = 5
|
|
Height = 23
|
|
Top = 5
|
|
Width = 47
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Print'
|
|
Default = True
|
|
OnClick = btnPrintClick
|
|
TabOrder = 0
|
|
end
|
|
object btnFirst: TButton
|
|
AnchorSideLeft.Control = btnClose
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 318
|
|
Height = 23
|
|
Top = 5
|
|
Width = 38
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '<<'
|
|
OnClick = btnFirstClick
|
|
TabOrder = 1
|
|
end
|
|
object btnPrev: TButton
|
|
AnchorSideLeft.Control = btnFirst
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 361
|
|
Height = 23
|
|
Top = 5
|
|
Width = 32
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '<'
|
|
OnClick = btnPrevClick
|
|
TabOrder = 2
|
|
end
|
|
object btnNext: TButton
|
|
AnchorSideLeft.Control = lblMaxPage
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 490
|
|
Height = 23
|
|
Top = 5
|
|
Width = 32
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '>'
|
|
OnClick = btnNextClick
|
|
TabOrder = 4
|
|
end
|
|
object btnLast: TButton
|
|
AnchorSideLeft.Control = btnNext
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 527
|
|
Height = 23
|
|
Top = 5
|
|
Width = 38
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '>>'
|
|
OnClick = btnLastClick
|
|
TabOrder = 5
|
|
end
|
|
object btnClose: TButton
|
|
AnchorSideLeft.Control = ZoomCombo
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 261
|
|
Height = 23
|
|
Top = 5
|
|
Width = 52
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Cancel = True
|
|
Caption = 'Close'
|
|
ModalResult = 2
|
|
TabOrder = 6
|
|
end
|
|
object edtPage: TEdit
|
|
AnchorSideLeft.Control = Label1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 432
|
|
Height = 21
|
|
Top = 6
|
|
Width = 32
|
|
BorderSpacing.Around = 5
|
|
OnChange = edtPageChange
|
|
TabOrder = 3
|
|
Text = '1'
|
|
end
|
|
object ZoomCombo: TComboBox
|
|
AnchorSideLeft.Control = Label3
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 195
|
|
Height = 21
|
|
Top = 6
|
|
Width = 61
|
|
BorderSpacing.Around = 5
|
|
ItemHeight = 13
|
|
Items.Strings = (
|
|
'10%'
|
|
'25%'
|
|
'50%'
|
|
'75%'
|
|
'100%'
|
|
'150%'
|
|
'200%'
|
|
'300%'
|
|
'400%'
|
|
)
|
|
OnChange = ZoomComboChange
|
|
Style = csDropDownList
|
|
TabOrder = 7
|
|
end
|
|
object btnSelectPrinter: TButton
|
|
AnchorSideLeft.Control = btnPrint
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 57
|
|
Height = 23
|
|
Top = 5
|
|
Width = 97
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Select printer...'
|
|
OnClick = btnSelectPrinterClick
|
|
TabOrder = 8
|
|
end
|
|
end
|
|
object ScrollBox1: TScrollBox
|
|
Left = 0
|
|
Height = 339
|
|
Top = 33
|
|
Width = 645
|
|
Align = alClient
|
|
ClientHeight = 335
|
|
ClientWidth = 641
|
|
Color = clBtnFace
|
|
ParentColor = False
|
|
TabOrder = 1
|
|
object PaperPanel: TPanel
|
|
Left = 0
|
|
Height = 125
|
|
Top = 0
|
|
Width = 158
|
|
BevelOuter = bvNone
|
|
ClientHeight = 125
|
|
ClientWidth = 158
|
|
Color = clWhite
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
object PaintBox1: TPaintBox
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 0
|
|
Height = 113
|
|
Top = 0
|
|
Width = 145
|
|
OnPaint = PaintBox1Paint
|
|
end
|
|
end
|
|
end
|
|
end
|