Hallo,
ich habe eine Klasse in der ein Array vom Typ TImage existiert. Beim Constructor dieser Klasse soll das Array mit gewissen Bildern gefüllt werden. Ich habe folgendes probiert:
Delphi-Quellcode:
for i := Low(Bilder) to High(Bilder) do begin
Bilder[i] := TImage.Create(Self);
with Bilder[i] do begin
Width := 60;
Height := 75;
Picture.LoadFromFile('Bilder\'+IntToStr(i)+'.bmp');
end;
end;
Nun möchte ich mit einer Funktion ein bestimmtes Bild aus dem Array nehmen und auf der Form in ein bestehendes Image laden. Jedoch funktioniert das laden der TImage-Variable in das TImage nicht, mein Code sieht so aus:
Delphi-Quellcode:
Zahl := Random(High(Bilder))+1;
Bild:= Bilder[zahl];
Und beim laden in das TImage(nicht mehr in der Klasse sondern im
GUI):
imgBild1 := Auswahl.Bild
.. wobei Auswahl als Klasse deklariert wurde.
Wo ist da mein Fehler? Es soll einfach nur ein bestimmtes Bild aus einem Array mittels einer Klasse in einem bestehendem TImage angezeigt werden.
Schonmal Danke im vorraus,
mfG Sunset