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

* Merging revisions r43480 from trunk:

Browse Source 
------------------------------------------------------------------------
    r43480 | michael | 2019-11-15 16:21:38 +0100 (Fri, 15 Nov 2019) | 1 line
    
    * Make Draw, Stretchdraw, CopyRect virtual. Bug ID #35126
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@43717 -
This commit is contained in:
michael 2019-12-23 13:23:27 +00:00
parent 8e7c1a2d6f
commit c47afd74ab
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
packages/fcl-image/src/fpcanvas.pp
View File

@ -371,9 +371,9 @@ type
procedure Line (const p1,p2:TPoint);
procedure Line (const points:TRect);
// other procedures
procedure CopyRect (x,y:integer; canvas:TFPCustomCanvas; SourceRect:TRect);
procedure Draw (x,y:integer; image:TFPCustomImage);
procedure StretchDraw (x,y,w,h:integer; source:TFPCustomImage);
procedure CopyRect (x,y:integer; canvas:TFPCustomCanvas; SourceRect:TRect); virtual;
procedure Draw (x,y:integer; image:TFPCustomImage); virtual;
procedure StretchDraw (x,y,w,h:integer; source:TFPCustomImage); virtual;
procedure Erase;virtual;
procedure DrawPixel(const x, y: integer; const newcolor: TFPColor);
// properties