pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

GridPrinter: Complete xml documentation of the gridprn unit.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8648 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-12-13 22:54:51 +00:00
parent e52bf4a609
commit 5f4edeff99
2 changed files with 174 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/gridprinter/source/gridprn.pas
View File

@ -551,7 +551,7 @@ end;
function TGridPrnHeaderFooter.RealLineWidth: Integer;
begin
if FLineWidth = 0 then
if FLineWidth <= 0 then
Result := FOwner.ScaleY(1)
else
Result := mm2px(FLineWidth/FOwner.PrintScaleFactor, FOwner.PixelsPerInchY);