Hi
Habe folgendes Problem / Frage !
Hiermit erstelle ich in einem Zufallsintervall Images...
Delphi-Quellcode:
with TImage.create(self) do
begin
Parent := Self;
if Seite=1 then Left:=-15 else Left:=Form1.Width+15;
height:=15;
width:=36;
Picture.LoadFromFile('wolke.bmp');
name:='Wolke'+IntToStr(b);
end;
b ist in einer Ini Datei gespeichert so dass die Bilder die Namen Wolke1, Wolke2, Wolke3 etc. haben...
Nun möchte ich in einer anderen Prozedur ALLE diese Bilder bewegen und habe es so versucht:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var b,i:integer;
Wolke:TImage;
begin
// Bewegt alle Wolken
ini:=TIniFile.Create('temp.ini');
b:=ini.ReadInteger('Wolken','Anzahl',0);
if b=0 then exit;
for i:=1 to b do
begin
Wolke[i].Left:=Wolke[i]+1;
end;
end;
Ich weiß das ist grad ein sehr großer depp Fehler aber ich komm grad echt nich auf die Lösung
)