[Delphi]TImageList

[anoniem]

Hallo, Ik zou een code nodig hebben om een afbeelding over te laden naar een TImageList ik dacht dat zo te doen : ImageList1.AddImages(Image1.Picture); maar dan geeft Delphi de volgende foutmelding : [Error] TestImage.pas(52): Incompatible types: 'TCustomImageList' and 'TPicture' Kan iemand mij helpen? Groetjes, Wim.

[anoniem]

[quote:bac74cf327="wim_verbakel"]Hallo, Ik zou een code nodig hebben om een afbeelding over te laden naar een TImageList ik dacht dat zo te doen : ImageList1.AddImages(Image1.Picture); maar dan geeft Delphi de volgende foutmelding : [Error] TestImage.pas(52): Incompatible types: 'TCustomImageList' and 'TPicture' Kan iemand mij helpen? [/quote:bac74cf327] Dat is ook niet zo moeilijk te verklaren als we de Delphi help bekijken.... [quote:bac74cf327="Delphi help"] Adds images from another image list to the image list object. procedure AddImages(Value: TCustomImageList); Description Use the AddImages method to add the images from another image list. Value specifies the source image list. AddImages returns -1 if it fails, 0 if it’s successful.[/quote:bac74cf327] De volgende functie komt dichter bij jouw doelstellingen:[quote:bac74cf327="Delphi help"] Adds an Image and its Mask to the image list object. [b:bac74cf327]function[/b:bac74cf327] [color=red:bac74cf327]Add[/color:bac74cf327](Image, Mask: TBitmap): Integer; Description Use the Add method to add images with their masks to an image list. It returns the index of the added image, or -1 if it fails. When the Masked property of the image list is False, the second bitmap is ignored; it can be set to nil.[/quote:bac74cf327]

[anoniem]

Bedankt, ik zelf al in de help gekeken maar ik had het nog niet gevonden.