diff --git a/components/gridprinter/examples/multi-language/main.lfm b/components/gridprinter/examples/multi-language/main.lfm index 967f61174..0cb154d9e 100644 --- a/components/gridprinter/examples/multi-language/main.lfm +++ b/components/gridprinter/examples/multi-language/main.lfm @@ -33,8 +33,9 @@ object MainForm: TMainForm Left = 6 Height = 25 Top = 460 - Width = 75 + Width = 60 Anchors = [akLeft, akBottom] + AutoSize = True BorderSpacing.Around = 6 Caption = 'Print...' OnClick = btnPrintClick @@ -44,7 +45,7 @@ object MainForm: TMainForm AnchorSideLeft.Control = cmbDialogs AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = btnPrint - Left = 275 + Left = 260 Height = 25 Top = 460 Width = 76 @@ -59,7 +60,7 @@ object MainForm: TMainForm AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = btnPrint AnchorSideTop.Side = asrCenter - Left = 87 + Left = 72 Height = 23 Top = 461 Width = 164 @@ -81,10 +82,10 @@ object MainForm: TMainForm AnchorSideTop.Side = asrCenter AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom - Left = 357 + Left = 342 Height = 22 Top = 461 - Width = 293 + Width = 308 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 ItemHeight = 16 diff --git a/components/gridprinter/source/gridprnheaderfooterform.lfm b/components/gridprinter/source/gridprnheaderfooterform.lfm index 04252e2fe..1c0726ba7 100644 --- a/components/gridprinter/source/gridprnheaderfooterform.lfm +++ b/components/gridprinter/source/gridprnheaderfooterform.lfm @@ -139,7 +139,7 @@ object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm AnchorSideRight.Side = asrBottom Left = 10 Height = 4 - Top = 224 + Top = 225 Width = 550 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 16 @@ -151,7 +151,7 @@ object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm AnchorSideTop.Side = asrBottom Left = 10 Height = 19 - Top = 240 + Top = 241 Width = 115 BorderSpacing.Top = 12 Caption = 'Show dividing line' @@ -163,7 +163,7 @@ object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm AnchorSideTop.Side = asrCenter Left = 10 Height = 15 - Top = 271 + Top = 272 Width = 88 Caption = 'Line width (mm)' end @@ -174,7 +174,7 @@ object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm AnchorSideTop.Side = asrBottom Left = 106 Height = 23 - Top = 267 + Top = 268 Width = 64 Alignment = taRightJustify BorderSpacing.Left = 8 @@ -192,12 +192,14 @@ object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = seLineWidth AnchorSideTop.Side = asrCenter + AnchorSideBottom.Control = seLineWidth + AnchorSideBottom.Side = asrBottom Left = 186 - Height = 25 - Top = 266 + Height = 24 + Top = 267 Width = 94 + Anchors = [akTop, akLeft, akBottom] BorderSpacing.Left = 16 - BorderSpacing.Bottom = 8 BorderWidth = 2 ButtonColorAutoSize = False ButtonColorSize = 16 @@ -206,10 +208,14 @@ object GridPrintHeaderFooterForm: TGridPrintHeaderFooterForm Margin = 4 end object lblTextInfo: TLabel + AnchorSideLeft.Control = edTextLeft + AnchorSideTop.Control = edTextLeft + AnchorSideTop.Side = asrBottom Left = 10 Height = 120 - Top = 88 + Top = 89 Width = 278 + BorderSpacing.Top = 8 Caption = 'Each section can contain the following parameters:'#13#10' $DATE - Current date'#13#10' $TIME - Current time'#13#10' $PAGE - Page number'#13#10' $PAGECOUNT - Number of pages'#13#10' $FULL_FILENAME - Full name of the printed file'#13#10' $FILENAME - Name of the printed file, without path'#13#10' $PATH - Path of the printed file' end end