summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2012-08-16 17:33:39 +0100
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2012-08-16 17:33:39 +0100
commit28635bb281f0374ae8466a25854d7c71701ec95a (patch)
tree132bc667272c851434f7d2ec8f55c07b9adfe7bc /src
parentb9a500e818228e751da10548f46e6427dbe0eb74 (diff)
downloadfpGUI-28635bb281f0374ae8466a25854d7c71701ec95a.tar.xz
pdf preview: label text is now horizontally aligned with other text.
Specifying a 0 width meant the AutoSize = True kicked in, and the width and height was adjusted, giving the uneven horizontal alignment with other widgets.
Diffstat (limited to 'src')
-rw-r--r--src/reportengine/u_visu.pas18
1 files changed, 9 insertions, 9 deletions
diff --git a/src/reportengine/u_visu.pas b/src/reportengine/u_visu.pas
index 43e3ca6b..88bfa356 100644
--- a/src/reportengine/u_visu.pas
+++ b/src/reportengine/u_visu.pas
@@ -490,21 +490,21 @@ begin
E_NumPage.OnKeyPress := @E_NumPageKeypress;
Bt_NextPage := CreateButton(Bv_Pages, 174, 6, 26, '', @Bt_NextPageClick, 'repimg.Next');
Bt_LastPage := CreateButton(Bv_Pages, 200, 6, 26, '', @Bt_LastPageClick, 'repimg.Last');
- L_Pages := CreateLabel(Bv_Pages, 5, E_NumPage.Top, 'Page', 0, E_NumPage.Height, taLeftJustify, tlcenter);
- L_FromPage := CreateLabel(Bv_Pages, 235, E_NumPage.Top, 'of', 0, E_NumPage.Height, taLeftJustify, tlcenter);
+ L_Pages := CreateLabel(Bv_Pages, 5, E_NumPage.Top, 'Page', 45, E_NumPage.Height, taLeftJustify, tlcenter);
+ L_FromPage := CreateLabel(Bv_Pages, 235, E_NumPage.Top, 'of', 30, E_NumPage.Height, taLeftJustify, tlcenter);
L_NbrPages := CreateLabel(Bv_Pages, 265, E_NumPage.Top, ' ', 30, E_NumPage.Height, taCenter, tlcenter);
Bv_Sections := CreateBevel(Bv_Command, 540, 5, 500, 40, bsBox, bsLowered);
Bt_PrecSect := CreateButton(Bv_Sections, 90, 6, 26, '', @Bt_PrecSectClick, 'repimg.Precedent');
E_NumSect := CreateEditInteger(Bv_Sections, 120, 8, 60, 0);
E_NumSect.OnKeyPress := @E_NumSectKeyPress;
Bt_NextSect := CreateButton(Bv_Sections, 184, 6, 26, '', @Bt_NextSectClick, 'repimg.Next');
- L_Sections := CreateLabel(Bv_Sections, 5, E_NumSect.Top, 'Section', 0, E_NumSect.Height, taLeftJustify, tlcenter);
- L_FromSect := CreateLabel(Bv_Sections, 250, E_NumSect.Top, 'of', 0, E_NumSect.Height, taLeftJustify, tlcenter);
- L_NbrSect := CreateLabel(Bv_Sections, 280, E_NumSect.Top, '-', 0, E_NumSect.Height, taLeftJustify, tlcenter);
- L_PageSect := CreateLabel(Bv_Sections, 320, E_NumSect.Top, 'Page', 0, E_NumSect.Height, taLeftJustify, tlcenter);
- L_NumPageSect := CreateLabel(Bv_Sections, 365, E_NumSect.Top, '-', 0, E_NumSect.Height, taLeftJustify, tlcenter);
- L_FromPageSect := CreateLabel(Bv_Sections, 410, E_NumSect.Top, 'of', 0, E_NumSect.Height, taLeftJustify, tlcenter);
- L_NbrPageSect := CreateLabel(Bv_Sections, 440, E_NumSect.Top, '-', 0, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_Sections := CreateLabel(Bv_Sections, 5, E_NumSect.Top, 'Section', 75, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_FromSect := CreateLabel(Bv_Sections, 250, E_NumSect.Top, 'of', 30, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_NbrSect := CreateLabel(Bv_Sections, 280, E_NumSect.Top, '-', 30, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_PageSect := CreateLabel(Bv_Sections, 320, E_NumSect.Top, 'Page', 45, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_NumPageSect := CreateLabel(Bv_Sections, 365, E_NumSect.Top, '-', 30, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_FromPageSect := CreateLabel(Bv_Sections, 410, E_NumSect.Top, 'of', 30, E_NumSect.Height, taLeftJustify, tlcenter);
+ L_NbrPageSect := CreateLabel(Bv_Sections, 440, E_NumSect.Top, '-', 30, E_NumSect.Height, taLeftJustify, tlcenter);
end;
destructor TF_Visu.Destroy;