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

CairoProg example: cleanup

Browse Source 
git-svn-id: trunk@47685 -
This commit is contained in:
juha 2015-02-10 17:23:25 +00:00
parent 6f0e7b8208
commit 7a1e890dab
2 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/cairocanvas/example/cairoprog.lpi
View File

@ -39,7 +39,6 @@
<Unit0> <Unit0>
<Filename Value="cairoprog.lpr"/> <Filename Value="cairoprog.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="cairoprog"/>
</Unit0> </Unit0>
</Units> </Units>
</ProjectOptions> </ProjectOptions>

1
components/cairocanvas/example/cairoprog.lpr
View File

@ -20,7 +20,6 @@ begin
PrinterCanvas.Font.Height := 24; PrinterCanvas.Font.Height := 24;
PrinterCanvas.TextOut(50, 150, 'abcdefghijklmnopqrstuvwxyzåäö'); PrinterCanvas.TextOut(50, 150, 'abcdefghijklmnopqrstuvwxyzåäö');
WriteLn('Written file ' + PrinterCanvas.OutputFileName); WriteLn('Written file ' + PrinterCanvas.OutputFileName);
ReadLn;
finally finally
PrinterCanvas.Free; PrinterCanvas.Free;
end; end;