Or declare anImage; as

anImage : Graphics.TBitmap;

Regards,
Dennis.

> -----Original Message-----
> 
> It's a problem with your uses clause in that module.  The Windows unit
> defines "TBitmap = tagBitmap", so you need to have the 
> Graphics unit appear
> after Windows.
> 
> Cheers,
> Carl
> 
> -----Original Message-----
> From: Paul Lowman [mailto:[EMAIL PROTECTED]]
> Sent: Monday, 17 April 2000 1:06 PM
> To: Multiple recipients of list delphi
> Subject: [DUG]: TBitmap tagBITMAP
> 
> 
> Help!
> 
> I have a TImageList created at run time and loaded with bitmaps from a
> resource file. No problems.
> I now want to add a single bitmap as follows
> 
> Var
>      anImage : TBitmap;
> 
>           .............
>           ImageIndex := Glyphs.Add(anImage,Nil);
>           ...........
> 
> this throw up an error
> 
> [Error] CADView.pas(537): Incompatible types: 'TBitmap' and 
> 'tagBITMAP'
> 
> with cursor just before the Nil.
> 
> I have been through source, help files etc but cannot for 
> life of me see
> whats wrong. TImageList.Add quite plainly states that the 
> parameters are
> TBitmaps !!
> 
> Anyone ?
> 
> Paul Lowman
> 
> 
> --------------------------------------------------------------
> -------------
>     New Zealand Delphi Users group - Delphi List - 
> [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> --------------------------------------------------------------
> -------------
>     New Zealand Delphi Users group - Delphi List - 
> [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> 
---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to