paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-07 19:27:12 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Patch from Darius Blaszijk to make some methods protected, virtual

Browse Source 
git-svn-id: trunk@16551 -
This commit is contained in:
michael 2010-12-11 14:03:57 +00:00
parent 179229007e
commit 2f5f98d7e5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-image/src/ftfont.pp
View File

@ -31,10 +31,10 @@ type
FIndex, FFontID : integer;
FFace : PFT_Face;
FAngle : real;
procedure DrawChar (x,y:integer; data:PByteArray; pitch, width, height:integer);
procedure DrawCharBW (x,y:integer; data:PByteArray; pitch, width, height:integer);
procedure ClearLastText;
protected
procedure DrawChar (x,y:integer; data:PByteArray; pitch, width, height:integer); virtual;
procedure DrawCharBW (x,y:integer; data:PByteArray; pitch, width, height:integer); virtual;
procedure SetName (AValue:string); override;
procedure SetIndex (AValue : integer);
procedure SetSize (AValue : integer); override;