ich möchte ein kleines Spiel in Lazarus nachbauen. Dazu benötige ich eine größere Anzahl Bilder, welche auf dem Bildschirm auftauchen. Diese Bilder erstelle ich mit:
Code: Alles auswählen
var Chicks : array[0..5] of TImage;
...
var i : Integer;
begin
for i := 0 to 5 do
begin
Chicks[i] := TImage.Create(Nil);
Chicks[i].Parent := Form1;
Chicks[i].[...]
end;
end;
Das funktioniert auch soweit. Mithilfe einer Sinusfunktion sollen sich diese Bilder nun über den Bildschirm bewegen. Die Parameter möchte werden dann zufällig erstellt und sollen am Besten zu jedem Bild gespeichert werden. Das sind 4 Parameter und 2 Standortinformationen. Diese werden alle als Doubles gespeichtert.
Nun gibt es natürlich das Problem, dass ein Array ja nur einen Datentypen halten kann. Ist es dennoch irgendwie möglich, dass ich Doubles zu jedem Image abspeichern kann?
Es soll quasi so "aussehen":
Code: Alles auswählen
|Img1|Img2|Img3|Img4| (alle vom Typ TImage)
a: | 3 | 7 | ... (alle vom Typ Double)
b: |0.1 |0,5 | ...
c: ...
d: ...
Ein schönes Wochenende!
Mit freundlichen Grüßen
Lucas