GridPrinter: Minor rework in multi-language demo.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8615 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-11-12 22:38:55 +00:00
parent 998ea63b35
commit 3af3022fac
2 changed files with 19 additions and 16 deletions

View File

@@ -2,10 +2,10 @@ object MainForm: TMainForm
Left = 331
Height = 491
Top = 127
Width = 656
Width = 651
Caption = 'Multi-Language Demonstration of TGridPrinter'
ClientHeight = 491
ClientWidth = 656
ClientWidth = 651
OnCreate = FormCreate
LCLVersion = '2.3.0.0'
object StringGrid1: TStringGrid
@@ -18,7 +18,7 @@ object MainForm: TMainForm
Left = 8
Height = 411
Top = 39
Width = 640
Width = 635
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 8
ColCount = 6
@@ -85,7 +85,7 @@ object MainForm: TMainForm
Left = 348
Height = 22
Top = 459
Width = 300
Width = 295
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 8
DropDownCount = 24
@@ -110,13 +110,13 @@ object MainForm: TMainForm
Left = 8
Height = 23
Top = 8
Width = 640
Width = 635
Align = alTop
AutoSize = True
BorderSpacing.Around = 8
BevelOuter = bvNone
ClientHeight = 23
ClientWidth = 640
ClientWidth = 635
TabOrder = 5
object Label1: TLabel
AnchorSideLeft.Control = Panel1
@@ -137,7 +137,7 @@ object MainForm: TMainForm
Left = 61
Height = 23
Top = 0
Width = 579
Width = 574
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
ItemHeight = 15
@@ -148,9 +148,9 @@ object MainForm: TMainForm
end
object GridPrinter1: TGridPrinter
Grid = StringGrid1
Footer.Font.Height = -11
Header.Font.Height = -11
Header.Text = 'test||'
Footer.FontSize = 0
Header.Text = 'Test||'
Header.FontSize = 0
Left = 168
Top = 96
end