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

fixes for fpc 1.1

Browse Source 
git-svn-id: trunk@2693 -
This commit is contained in:
mattias 2002-08-18 04:56:49 +00:00
parent 93dae0ca55
commit 2ea295798e
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/graphics.pp
View File

@ -680,6 +680,8 @@ type
procedure LoadFromLazarusResource(const ResName: String); override;
procedure LoadFromResourceName(Instance: THandle; const ResName: String); virtual;
procedure LoadFromResourceID(Instance: THandle; ResID: Integer); virtual;
procedure LoadFromClipboardFormat(FormatID: TClipboardFormat); override;
procedure SaveToClipboardFormat(FormatID: TClipboardFormat); override;
Procedure LoadFromXPMFile(const Filename : String);
procedure LoadFromFile(const Filename: string); Override;
procedure Mask(ATransparentColor: TColor);
@ -953,6 +955,9 @@ end.
{ =============================================================================
$Log$
Revision 1.57 2002/12/16 12:12:50 mattias
fixes for fpc 1.1
Revision 1.56 2002/12/12 17:47:44 mattias
new constants for compatibility