Problem mit ImageList.GetBitmap

[Brainstalker]

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?