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

tvplanit: Fix memory leak in TVpExCanvas.DrawRotatedText (temporary font not destroyed).

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4930 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-07-06 21:59:58 +00:00
parent 1c6dc6b123
commit 574c68f4f8
2 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
components/tvplanit/source/vpcanvasutils.pas
View File

@ -777,6 +777,7 @@ begin
finally
// Restore previously used font.
FCanvas.Font.Assign(OldFont);
OldFont.Free;
end;
end;

2
components/tvplanit/source/vpedfmtlst.pas
View File

@ -785,7 +785,7 @@ begin
if lbFormats.ItemIndex > -1 then begin
Idx := Prn.Find(lbFormats.Items[lbFormats.ItemIndex]);
if Idx > - 1 then
Prn.CurFormat := Idx;
Prn.CurFormat := Idx;
{Prn.CurFormat := lbFormats.ItemIndex; }
end;
Prn.NotifyLinked;