lazarus/components/lazreport/source/lr_prdlg.lfm
jesus d877b82218 LazReport: Patch from Alexey Lagunov
1. Copies collation is done internally
2. Property has been implemented lrMemo.Text
3. Finalized editor of the prepared report
4. Fixed bug when printing TfrPrintGrid after a call to another report designer

git-svn-id: trunk@43775 -
2014-01-20 03:35:56 +00:00

268 lines
6.9 KiB
Plaintext

object frPrintForm: TfrPrintForm
Left = 414
Height = 296
Top = 173
Width = 390
HorzScrollBar.Page = 367
VertScrollBar.Page = 269
ActiveControl = OkButton
BorderStyle = bsDialog
Caption = 'Print'
ClientHeight = 296
ClientWidth = 390
OnCreate = FormCreate
OnDeactivate = FormDeactivate
Position = poScreenCenter
LCLVersion = '1.3'
object Image1: TImage
Left = 192
Height = 16
Top = 64
Width = 18
AutoSize = True
Picture.Data = {
07544269746D617036010000424D360100000000000076000000280000001200
0000100000000100040000000000C00000000000000000000000100000000000
000000000000000080000080000000808000800000008000800080800000C0C0
C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
FF00333333333333333333000000333333300033333333000000333330088800
33333300000033300887888800333300000030088777888888003300000038F7
777F888888880300000038F77FF7778888880300000038FFF779977788880300
000038F77AA777770788030000003388F77777FF070033000000333388F8FFFF
F0333300000033333388FFFFFF0333000000333333338FFFFFF0030000003333
333338FFF8833300000033333333338883333300000033333333333333333300
0000
}
Visible = False
end
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideBottom.Control = E1
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 19
Top = 87
Width = 40
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
Caption = 'Copies'
ParentColor = False
end
object GroupBox2: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = E1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 178
Top = 112
Width = 318
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Caption = 'Page range'
ClientHeight = 158
ClientWidth = 316
TabOrder = 0
object Label2: TLabel
AnchorSideLeft.Control = GroupBox2
AnchorSideTop.Control = E2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox2
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = GroupBox2
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 51
Top = 101
Width = 304
Anchors = [akTop, akLeft, akRight, akBottom]
AutoSize = False
BorderSpacing.Around = 6
Caption = 'Enter page numbers and/or page ranges, separated by commas. For example, 1,3,5-12'
ParentColor = False
WordWrap = True
end
object RB1: TRadioButton
AnchorSideLeft.Control = GroupBox2
AnchorSideTop.Control = GroupBox2
Left = 6
Height = 23
Top = 6
Width = 42
HelpContext = 108
BorderSpacing.Around = 6
Caption = 'All'
Checked = True
TabOrder = 0
TabStop = True
end
object RB2: TRadioButton
AnchorSideLeft.Control = GroupBox2
AnchorSideTop.Control = RB1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 35
Width = 103
HelpContext = 118
BorderSpacing.Around = 6
Caption = 'Current &page'
TabOrder = 1
end
object RB3: TRadioButton
AnchorSideLeft.Control = GroupBox2
AnchorSideBottom.Control = E2
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 23
Top = 72
Width = 83
HelpContext = 124
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
Caption = '&Numbers:'
OnClick = RB3Click
TabOrder = 2
end
object E2: TEdit
AnchorSideLeft.Control = RB3
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RB2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox2
AnchorSideRight.Side = asrBottom
Left = 95
Height = 31
Top = 64
Width = 215
HelpContext = 133
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
OnClick = E2Click
TabOrder = 3
end
end
object OkButton: TButton
AnchorSideLeft.Control = CancelButton
AnchorSideTop.Control = GroupBox1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 330
Height = 31
Top = 75
Width = 54
HelpContext = 40
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = 'Ok'
Default = True
ModalResult = 1
TabOrder = 1
end
object CancelButton: TButton
AnchorSideTop.Control = OkButton
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 330
Height = 31
Top = 112
Width = 54
HelpContext = 50
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 2
end
object GroupBox1: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 63
Top = 6
Width = 378
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Printer'
ClientHeight = 43
ClientWidth = 376
TabOrder = 3
object PropButton: TButton
AnchorSideTop.Control = GroupBox1
AnchorSideRight.Control = GroupBox1
AnchorSideRight.Side = asrBottom
Left = 295
Height = 31
Top = 6
Width = 75
HelpContext = 152
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Properties'
OnClick = PropButtonClick
TabOrder = 0
end
object CB1: TComboBox
AnchorSideLeft.Control = GroupBox1
AnchorSideTop.Control = GroupBox1
AnchorSideRight.Control = PropButton
Left = 6
Height = 31
Top = 6
Width = 283
HelpContext = 142
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
ItemHeight = 0
OnChange = CB1Click
OnClick = CB1Click
OnDrawItem = CB1DrawItem
Style = csDropDownList
TabOrder = 1
end
end
object cbCollate: TCheckBox
AnchorSideLeft.Control = E1
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = E1
AnchorSideBottom.Side = asrBottom
Left = 139
Height = 23
Top = 83
Width = 70
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
Caption = 'Collate'
TabOrder = 4
end
object E1: TSpinEdit
AnchorSideLeft.Control = Label1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = GroupBox1
AnchorSideTop.Side = asrBottom
Left = 52
Height = 31
Top = 75
Width = 81
BorderSpacing.Around = 6
TabOrder = 5
Value = 1
end
object PrinterSetupDialog1: TPrinterSetupDialog
left = 264
top = 80
end
end