Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
Bild: TBitMap;
const
Pfade: array[0..2] of string = ('1.bmp', '2.bmp', '3.bmp');
begin
Bild := TBitMap.Create; //Hier ist Zeile 283
for i := 0 to 2 do
begin
Bild.LoadFromFile(Pfade[i]);
Imagelist1.AddMasked(Bild, clNone);
end;
Bild.Free;
end;
In einem neuen Projekt geht das wunderbar. In meiner Anwendung allerdings nicht.
Delphi meldet
[Error] Unit1.pas(283): Object or class type required
Die Variablen sind nicht andersweitig deklaruert, die units sind eingebunden. Bin ich blöd?