Hallo,
geschafft !!!
Der Link hat mir weitergeholfen.
http://www.delphi32.com/info_facts/faq/faq_367.asp
Ich habe mir einfach ein komplett weisses Image erzeugt
(
RGB 3mal 255), das kommt in die ImageList.
und dann tata
Delphi-Quellcode:
var
Bitmap: TBitmap;
begin
Bitmap:= TBitmap.Create;
try
ImageList_TrafficColor.GetBitmap(6, Bitmap);
Bitmap.TransparentColor:= clWhite;
finally
Bitmap.Free;
end;
6 ist der Index des transparenten Images (ist also das 5.)
Heiko