You've already forked lazarus-ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8684 8e941d3f-bd1b-0410-a28a-d453659cc2b4
248 lines
5.6 KiB
Plaintext
248 lines
5.6 KiB
Plaintext
object frmPrintPreview: TfrmPrintPreview
|
|
Left = 325
|
|
Height = 818
|
|
Top = 118
|
|
Width = 540
|
|
HorzScrollBar.Page = 476
|
|
VertScrollBar.Page = 517
|
|
Caption = 'Print Preview'
|
|
ClientHeight = 818
|
|
ClientWidth = 540
|
|
Constraints.MinHeight = 200
|
|
Constraints.MinWidth = 395
|
|
KeyPreview = True
|
|
OnCreate = FormCreate
|
|
OnKeyDown = FormKeyDown
|
|
OnShow = FormShow
|
|
LCLVersion = '2.3.0.0'
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 56
|
|
Top = 0
|
|
Width = 540
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 56
|
|
ClientWidth = 540
|
|
TabOrder = 0
|
|
object ToolBar1: TToolBar
|
|
Left = 0
|
|
Height = 27
|
|
Top = 0
|
|
Width = 540
|
|
AutoSize = True
|
|
ButtonHeight = 25
|
|
ButtonWidth = 23
|
|
Caption = 'ToolBar1'
|
|
EdgeBorders = [ebBottom]
|
|
Images = imMain
|
|
List = True
|
|
ParentShowHint = False
|
|
ShowCaptions = True
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
OnResize = ToolBar1Resize
|
|
object btnPrint: TToolButton
|
|
Left = 1
|
|
Top = 0
|
|
Action = actPrint
|
|
AutoSize = True
|
|
end
|
|
object ToolButton3: TToolButton
|
|
Left = 55
|
|
Height = 25
|
|
Top = 0
|
|
Caption = 'ToolButton3'
|
|
ImageIndex = 2
|
|
Style = tbsDivider
|
|
end
|
|
object btnFirstPage: TToolButton
|
|
Left = 60
|
|
Top = 0
|
|
Action = actFirstPage
|
|
AutoSize = True
|
|
ShowCaption = False
|
|
end
|
|
object btnPrevPage: TToolButton
|
|
Left = 83
|
|
Top = 0
|
|
Action = actPrevPage
|
|
AutoSize = True
|
|
ShowCaption = False
|
|
end
|
|
object btnNextPage: TToolButton
|
|
Left = 106
|
|
Top = 0
|
|
Action = actNextPage
|
|
AutoSize = True
|
|
ShowCaption = False
|
|
end
|
|
object btnLastPage: TToolButton
|
|
Left = 129
|
|
Top = 0
|
|
Action = actLastPage
|
|
AutoSize = True
|
|
ShowCaption = False
|
|
end
|
|
object ToolButton8: TToolButton
|
|
Left = 152
|
|
Height = 25
|
|
Top = 0
|
|
Caption = 'ToolButton8'
|
|
ImageIndex = 6
|
|
Style = tbsDivider
|
|
end
|
|
object btnCancel: TToolButton
|
|
Left = 157
|
|
Top = 0
|
|
Action = actCancel
|
|
AutoSize = True
|
|
end
|
|
object pnlPageCount: TPanel
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 266
|
|
Height = 25
|
|
Top = 0
|
|
Width = 119
|
|
BevelOuter = bvNone
|
|
ClientHeight = 25
|
|
ClientWidth = 119
|
|
TabOrder = 0
|
|
object PageInfo: TLabel
|
|
AnchorSideTop.Control = pnlPageCount
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = pnlPageCount
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 64
|
|
Height = 15
|
|
Top = 5
|
|
Width = 47
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 8
|
|
Caption = 'PageInfo'
|
|
end
|
|
end
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 0
|
|
Height = 29
|
|
Top = 27
|
|
Width = 540
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 29
|
|
ClientWidth = 540
|
|
TabOrder = 1
|
|
object cboxZoom: TComboBox
|
|
Left = 391
|
|
Height = 23
|
|
Top = 2
|
|
Width = 145
|
|
Align = alRight
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 4
|
|
BorderSpacing.Bottom = 4
|
|
ItemHeight = 15
|
|
Items.Strings = (
|
|
'Fit to Control'
|
|
'Actual Size'
|
|
'25%'
|
|
'33%'
|
|
'50%'
|
|
'67%'
|
|
'75%'
|
|
)
|
|
OnChange = cboxZoomChange
|
|
Style = csDropDownList
|
|
TabOrder = 0
|
|
end
|
|
object VpPrintFormatComboBox1: TVpPrintFormatComboBox
|
|
AnchorSideRight.Control = cboxZoom
|
|
Left = 4
|
|
Height = 23
|
|
Top = 2
|
|
Width = 383
|
|
Anchors = [akTop, akLeft, akRight]
|
|
Borderspacing.Left = 4
|
|
Borderspacing.Top = 2
|
|
Borderspacing.Right = 4
|
|
Borderspacing.Bottom = 2
|
|
ItemHeight = 15
|
|
Sorted = True
|
|
TabOrder = 1
|
|
OnChange = VpPrintFormatComboBox1Change
|
|
end
|
|
end
|
|
end
|
|
object VpPrintPreview1: TVpPrintPreview
|
|
Left = 4
|
|
Height = 758
|
|
Top = 56
|
|
Width = 532
|
|
CurPage = 0
|
|
EndDate = 37355.4526088079
|
|
StartDate = 37348.4526088079
|
|
Align = alClient
|
|
BorderSpacing.Left = 4
|
|
BorderSpacing.Right = 4
|
|
BorderSpacing.Bottom = 4
|
|
Parent = Owner
|
|
TabStop = True
|
|
TabOrder = 1
|
|
end
|
|
object imMain: TImageList
|
|
Left = 272
|
|
Top = 160
|
|
end
|
|
object actMain: TActionList
|
|
Images = imMain
|
|
OnUpdate = actMainUpdate
|
|
Left = 192
|
|
Top = 160
|
|
object actPrint: TAction
|
|
Caption = '&Print'
|
|
Hint = 'Print'
|
|
ImageIndex = 0
|
|
OnExecute = actPrintExecute
|
|
ShortCut = 16464
|
|
end
|
|
object actFirstPage: TAction
|
|
Caption = '&First page'
|
|
Hint = 'First page'
|
|
ImageIndex = 1
|
|
OnExecute = actFirstPageExecute
|
|
ShortCut = 16454
|
|
end
|
|
object actPrevPage: TAction
|
|
Caption = 'Pre&vious page'
|
|
Hint = 'Previous page'
|
|
ImageIndex = 2
|
|
OnExecute = actPrevPageExecute
|
|
ShortCut = 16470
|
|
end
|
|
object actNextPage: TAction
|
|
Caption = '&Next page'
|
|
Hint = 'Next page'
|
|
ImageIndex = 3
|
|
OnExecute = actNextPageExecute
|
|
ShortCut = 16462
|
|
end
|
|
object actLastPage: TAction
|
|
Caption = '&Last page'
|
|
Hint = 'Last page'
|
|
ImageIndex = 4
|
|
OnExecute = actLastPageExecute
|
|
ShortCut = 16460
|
|
end
|
|
object actCancel: TAction
|
|
Caption = 'Cancel preview'
|
|
Hint = 'Cancel preview'
|
|
ImageIndex = 5
|
|
OnExecute = actCancelExecute
|
|
ShortCut = 32835
|
|
end
|
|
end
|
|
end
|