Ne das mit .Bitmap ist schon richtig, da es sich hierbei um ein Bitmap handelt. Vielleicht haben dich die Variablennamen irritiert. Wie ich geschrieben habe, funktioniert es in drei von vier Fällen.
ilIcons: TImageList
iIcon: TImage
1. Fall (direkter Aufruf mit Zahl):
ilIcons.GetBitmap(2, iIcon.Picture.Bitmap);
Mir wird das richtige Bitmap angezeigt.
2. Fall (direkter Aufruf mit Konstante):
Delphi-Quellcode:
const
I_ICON = 2;
ilIcons.GetBitmap(I_ICON, iIcon.Picture.Bitmap);
Hier wird auch das richtige Icon angezeigt.
3. Fall (aufrufen der Funktion mit Zahl):
Delphi-Quellcode:
function blabla(Icon: integer);
begin
ilIcons.GetBitmap(Icon, iIcon.Picture.Bitmap);
end;
blabla(2);
Funktioniert auch!
4. Fall (aufrufen der Funktion mit Zahl):
Delphi-Quellcode:
function blabla(Icon: integer);
begin
ilIcons.GetBitmap(Icon, iIcon.Picture.Bitmap);
end;
blabla(I_ICON);
Funktioniert nicht!!!
Ich rufe die Funktion aus einer anderen
Unit auf. Die Konstanten stehen in der
Unit mit der Funktion. Warum zum
funktioniert das nicht?
Michael N.