From 2ea295798e82412b1d29a544ca8883ea644710df Mon Sep 17 00:00:00 2001 From: mattias Date: Sun, 18 Aug 2002 04:56:49 +0000 Subject: [PATCH] fixes for fpc 1.1 git-svn-id: trunk@2693 - --- lcl/graphics.pp | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lcl/graphics.pp b/lcl/graphics.pp index c6ef494f42..0d84b6b4e6 100644 --- a/lcl/graphics.pp +++ b/lcl/graphics.pp @@ -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