paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-23 19:26:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazReport, fix error in last commit

Browse Source 
git-svn-id: trunk@32587 -
This commit is contained in:
jesus 2011-10-01 15:42:39 +00:00
parent ac3e5510a7
commit 1f3b1a891e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazreport/source/lr_class.pas
View File

@ -4631,7 +4631,7 @@ var
bx, by, bx1, by1, w1, w2: Integer; bx, by, bx1, by1, w1, w2: Integer;
begin begin
if FrameStyle=frsDouble then if FrameStyle=frsDouble then
w1 := Round(FrameWidth * 1.5); w1 := Round(FrameWidth * 1.5)
else else
w1 := Round(FrameWidth); w1 := Round(FrameWidth);