paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

RxFPC:fix RxDBGrid export to PDF setup form size

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7163 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75 2019-10-22 10:30:15 +00:00
parent bc42242dc3
commit de6af71768
1 changed files with 74 additions and 73 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

147
components/rx/trunk/rxdb/rxdbgridexportpdfsetupunit.lfm
View File

@ -1,21 +1,21 @@
object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
Left = 544
Height = 416
Height = 454
Top = 316
Width = 522
Caption = 'Export params'
ClientHeight = 416
ClientHeight = 454
ClientWidth = 522
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '1.9.0.0'
LCLVersion = '2.1.0.0'
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
Height = 13
Height = 17
Top = 6
Width = 78
Width = 99
BorderSpacing.Around = 6
Caption = 'Export file name'
FocusControl = FileNameEdit1
@ -28,8 +28,8 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 12
Height = 21
Top = 25
Height = 34
Top = 29
Width = 504
Filter = 'All files (*.*)|*.*|LibreOffice/OpenOffice (*.ods)|*.ods|Excell 97-2003|*.xls|Excell 2007-2013|*.xlxs'
FilterIndex = 0
@ -44,8 +44,8 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 34
Top = 376
Height = 46
Top = 402
Width = 510
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
@ -65,14 +65,15 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 117
Top = 52
Height = 144
Top = 69
Width = 510
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Global'
ClientHeight = 99
ClientWidth = 506
ClientHeight = 126
ClientWidth = 508
TabOrder = 2
object ColorBox1: TColorBox
AnchorSideLeft.Control = Label5
@ -80,10 +81,10 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox1
AnchorSideRight.Side = asrBottom
Left = 265
Height = 22
Top = 71
Width = 235
Left = 266
Height = 33
Top = 87
Width = 236
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames, cbCustomColors]
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
@ -94,10 +95,10 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideLeft.Control = Label3
AnchorSideTop.Control = CheckBox6
AnchorSideTop.Side = asrBottom
Left = 259
Height = 13
Top = 52
Width = 46
Left = 260
Height = 17
Top = 64
Width = 61
BorderSpacing.Around = 6
Caption = 'Title color'
ParentColor = False
@ -106,10 +107,10 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideLeft.Control = Label3
AnchorSideTop.Control = cbOverwriteExisting
AnchorSideTop.Side = asrBottom
Left = 259
Height = 17
Top = 29
Width = 86
Left = 260
Height = 23
Top = 35
Width = 112
BorderSpacing.Around = 6
Caption = 'Export images'
TabOrder = 1
@ -117,10 +118,10 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
object cbOverwriteExisting: TCheckBox
AnchorSideLeft.Control = Label3
AnchorSideTop.Control = GroupBox1
Left = 259
Height = 17
Left = 260
Height = 23
Top = 6
Width = 123
Width = 155
BorderSpacing.Around = 6
Caption = 'Overwrite existing file'
Enabled = False
@ -130,9 +131,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideLeft.Control = GroupBox1
AnchorSideTop.Control = GroupBox1
Left = 6
Height = 17
Height = 23
Top = 6
Width = 106
Width = 133
BorderSpacing.Around = 6
Caption = 'Open after export'
TabOrder = 3
@ -142,9 +143,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = cbOpenAfterExport
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 29
Width = 123
Height = 23
Top = 35
Width = 159
BorderSpacing.Around = 6
Caption = 'Export column header'
TabOrder = 4
@ -154,9 +155,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = cbExportColumnHeader
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 52
Width = 119
Height = 23
Top = 64
Width = 155
BorderSpacing.Around = 6
Caption = 'Export column footer'
TabOrder = 5
@ -166,9 +167,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = cbExportColumnFooter
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 75
Width = 99
Height = 23
Top = 93
Width = 130
BorderSpacing.Around = 6
Caption = 'Export cell colors'
TabOrder = 6
@ -177,7 +178,7 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideLeft.Control = GroupBox1
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = GroupBox1
Left = 253
Left = 254
Height = 1
Top = 0
Width = 1
@ -191,22 +192,22 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 139
Top = 175
Height = 169
Top = 219
Width = 510
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'PDF Options'
ClientHeight = 121
ClientWidth = 506
ClientHeight = 151
ClientWidth = 508
TabOrder = 3
object CheckBox1: TCheckBox
AnchorSideTop.Control = GroupBox2
Left = 6
Height = 17
Height = 23
Top = 6
Width = 55
Width = 73
BorderSpacing.Around = 6
Caption = 'Out line'
TabOrder = 0
@ -216,9 +217,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 29
Width = 88
Height = 23
Top = 35
Width = 113
BorderSpacing.Around = 6
Caption = 'Compress text'
TabOrder = 1
@ -228,9 +229,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = CheckBox2
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 52
Width = 93
Height = 23
Top = 64
Width = 122
BorderSpacing.Around = 6
Caption = 'Compress fonts'
TabOrder = 2
@ -240,9 +241,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = CheckBox3
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 75
Width = 101
Height = 23
Top = 93
Width = 133
BorderSpacing.Around = 6
Caption = 'Compress images'
TabOrder = 3
@ -252,9 +253,9 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Control = CheckBox4
AnchorSideTop.Side = asrBottom
Left = 6
Height = 17
Top = 98
Width = 84
Height = 23
Top = 122
Width = 108
BorderSpacing.Around = 6
Caption = 'Use raw JPEG'
TabOrder = 4
@ -263,10 +264,10 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideLeft.Control = Label4
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = GroupBox2
Left = 260
Height = 13
Left = 261
Height = 17
Top = 6
Width = 53
Width = 64
BorderSpacing.Around = 6
Caption = 'Paper type'
ParentColor = False
@ -277,13 +278,13 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox2
AnchorSideRight.Side = asrBottom
Left = 266
Height = 21
Top = 25
Width = 234
Left = 267
Height = 33
Top = 29
Width = 235
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
ItemHeight = 13
ItemHeight = 0
Style = csDropDownList
TabOrder = 5
end
@ -294,10 +295,10 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox2
AnchorSideRight.Side = asrBottom
Left = 260
Height = 52
Top = 52
Width = 240
Left = 261
Height = 64
Top = 68
Width = 241
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
@ -310,8 +311,8 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 34
ClientWidth = 236
ClientHeight = 46
ClientWidth = 239
Items.Strings = (
'Portrait'
'Landscape'
@ -322,7 +323,7 @@ object RxDBGridExportPdfSetupForm: TRxDBGridExportPdfSetupForm
AnchorSideLeft.Control = GroupBox2
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = GroupBox2
Left = 253
Left = 254
Height = 1
Top = 0
Width = 1