diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-10-12 12:08:23 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-10-12 12:08:23 +0200 |
| commit | c825590e0bbd214d3a04a8f4d1609c747480b436 (patch) | |
| tree | fcb4fdd2d904339bc7267a5f164b34c463202d4b /extras/contributed | |
| parent | ef203d0ddbbfe57ef9731a19df931d97af7b50f9 (diff) | |
| download | fpGUI-c825590e0bbd214d3a04a8f4d1609c747480b436.tar.xz | |
pdf report: print preview page now appears 10px below the controls bevel.
Diffstat (limited to 'extras/contributed')
| -rw-r--r-- | extras/contributed/report_tool/reportengine/u_imprime.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/extras/contributed/report_tool/reportengine/u_imprime.pas b/extras/contributed/report_tool/reportengine/u_imprime.pas index 7e28ae44..a994167f 100644 --- a/extras/contributed/report_tool/reportengine/u_imprime.pas +++ b/extras/contributed/report_tool/reportengine/u_imprime.pas @@ -705,7 +705,7 @@ begin F_Visu:= TF_Visu.Create(nil); with F_Visu do begin - Bv_Visu:= CreateBevel(F_Visu,(F_Visu.Width-FPapier.W) div 2,50+(F_Visu.Height-50-FPapier.H) div 2, + Bv_Visu:= CreateBevel(F_Visu,(F_Visu.Width-FPapier.W) div 2,60+((F_Visu.Height-FPapier.H) div 2), FPapier.W,FPapier.H,bsBox,bsRaised); Bv_Visu.BackgroundColor:= clWhite; Bv_Visu.OnPaint:= @Bv_VisuPaint; |