paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 04:39:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

small fix for the fpvectorial example

Browse Source 
git-svn-id: trunk@15802 -
This commit is contained in:
sekelsenmat 2010-08-13 15:34:07 +00:00
parent 3708922b62
commit b63e82f815
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fpvectorial/examples/cdr2svg_mainform.pas
View File

@ -62,7 +62,7 @@ begin
Vec.ReadFromFile(editInput.FileName, vfPDF);
imagePreview.Canvas.Brush.Color := clWhite;
imagePreview.Canvas.FillRect(0, 0, imagePreview.Width, imagePreview.Height);
DrawFPVectorialToCanvas(Vec, imagePreview.Canvas, 0, 0, 0.25, 0.25);
DrawFPVectorialToCanvas(Vec, imagePreview.Canvas);
finally
Vec.Free;
end;