mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-05 10:37:58 +02:00
296 lines
7.1 KiB
Plaintext
296 lines
7.1 KiB
Plaintext
object IpHTMLPreview: TIpHTMLPreview
|
|
Left = 274
|
|
Height = 498
|
|
Top = 141
|
|
Width = 863
|
|
Caption = 'Print preview'
|
|
ClientHeight = 498
|
|
ClientWidth = 863
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnResize = FormResize
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
LCLVersion = '2.1.0.0'
|
|
object ToolbarPanel: TPanel
|
|
Left = 0
|
|
Height = 36
|
|
Top = 0
|
|
Width = 863
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 36
|
|
ClientWidth = 863
|
|
TabOrder = 0
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = btnPrev
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 551
|
|
Height = 15
|
|
Top = 11
|
|
Width = 29
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Page:'
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel
|
|
AnchorSideLeft.Control = edtPage
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 622
|
|
Height = 15
|
|
Top = 11
|
|
Width = 11
|
|
BorderSpacing.Around = 5
|
|
Caption = 'of'
|
|
ParentColor = False
|
|
end
|
|
object lblMaxPage: TLabel
|
|
AnchorSideLeft.Control = Label2
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 638
|
|
Height = 1
|
|
Top = 18
|
|
Width = 1
|
|
BorderSpacing.Around = 5
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel
|
|
AnchorSideLeft.Control = btnSelectPrinter
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 170
|
|
Height = 15
|
|
Top = 11
|
|
Width = 35
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Zoom:'
|
|
ParentColor = False
|
|
end
|
|
object btnPrint: TButton
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 5
|
|
Height = 25
|
|
Top = 6
|
|
Width = 51
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Print'
|
|
Default = True
|
|
OnClick = btnPrintClick
|
|
TabOrder = 0
|
|
end
|
|
object btnFirst: TButton
|
|
AnchorSideLeft.Control = btnFit
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 465
|
|
Height = 25
|
|
Top = 6
|
|
Width = 42
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '<<'
|
|
OnClick = btnFirstClick
|
|
TabOrder = 6
|
|
end
|
|
object btnPrev: TButton
|
|
AnchorSideLeft.Control = btnFirst
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 512
|
|
Height = 25
|
|
Top = 6
|
|
Width = 34
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '<'
|
|
OnClick = btnPrevClick
|
|
TabOrder = 7
|
|
end
|
|
object btnNext: TButton
|
|
AnchorSideLeft.Control = lblMaxPage
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 644
|
|
Height = 25
|
|
Top = 6
|
|
Width = 34
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '>'
|
|
OnClick = btnNextClick
|
|
TabOrder = 9
|
|
end
|
|
object btnLast: TButton
|
|
AnchorSideLeft.Control = btnNext
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 683
|
|
Height = 25
|
|
Top = 6
|
|
Width = 42
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = '>>'
|
|
OnClick = btnLastClick
|
|
TabOrder = 10
|
|
end
|
|
object btnClose: TButton
|
|
AnchorSideLeft.Control = btnLast
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 746
|
|
Height = 25
|
|
Top = 6
|
|
Width = 55
|
|
AutoSize = True
|
|
BorderSpacing.Left = 16
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Close'
|
|
ModalResult = 2
|
|
TabOrder = 11
|
|
end
|
|
object edtPage: TEdit
|
|
AnchorSideLeft.Control = Label1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 585
|
|
Height = 23
|
|
Top = 7
|
|
Width = 32
|
|
Alignment = taRightJustify
|
|
BorderSpacing.Around = 5
|
|
OnChange = edtPageChange
|
|
TabOrder = 8
|
|
Text = '1'
|
|
end
|
|
object btnSelectPrinter: TButton
|
|
AnchorSideLeft.Control = btnPrint
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 61
|
|
Height = 25
|
|
Top = 6
|
|
Width = 104
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Select printer...'
|
|
OnClick = btnSelectPrinterClick
|
|
TabOrder = 1
|
|
end
|
|
object edtZoom: TSpinEdit
|
|
AnchorSideLeft.Control = Label3
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 210
|
|
Height = 23
|
|
Top = 7
|
|
Width = 61
|
|
Alignment = taRightJustify
|
|
BorderSpacing.Around = 5
|
|
MaxValue = 1000
|
|
MinValue = 1
|
|
OnChange = edtZoomChange
|
|
TabOrder = 2
|
|
Value = 100
|
|
end
|
|
object btnFitHeight: TButton
|
|
AnchorSideLeft.Control = edtZoom
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 276
|
|
Height = 25
|
|
Top = 6
|
|
Width = 62
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Height'
|
|
OnClick = btnFitHeightClick
|
|
TabOrder = 3
|
|
end
|
|
object btnFitWidth: TButton
|
|
AnchorSideLeft.Control = btnFitHeight
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 343
|
|
Height = 25
|
|
Top = 6
|
|
Width = 58
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Width'
|
|
OnClick = btnFitWidthClick
|
|
TabOrder = 4
|
|
end
|
|
object btnFit: TButton
|
|
AnchorSideLeft.Control = btnFitWidth
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ToolbarPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 406
|
|
Height = 25
|
|
Top = 6
|
|
Width = 54
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
Caption = 'Fit all'
|
|
OnClick = btnFitClick
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
object ScrollBox1: TScrollBox
|
|
Left = 0
|
|
Height = 462
|
|
Top = 36
|
|
Width = 863
|
|
HorzScrollBar.Page = 158
|
|
HorzScrollBar.Tracking = True
|
|
VertScrollBar.Page = 125
|
|
VertScrollBar.Tracking = True
|
|
Align = alClient
|
|
ClientHeight = 458
|
|
ClientWidth = 859
|
|
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
|
|
Left = 24
|
|
Height = 101
|
|
Top = 24
|
|
Width = 134
|
|
OnPaint = PaintBox1Paint
|
|
end
|
|
end
|
|
end
|
|
end
|