TImage Array??

Clever&Smart · Hält's aus hier Beiträge: 3

Hallo
Ich möchte irgendwie folgende Images in einer while schleife laden d.h
die zahl nach iplane soll die Zählvariable der Schleife sein.
Ist das möglich??

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

procedure tform1.main;
begin
iplane1.Picture.loadfromfile('pics/plane1.jpg');
iplane2.picture.loadfromfile('pics/plane2.jpg');
iplane3.picture.loadfromfile('pics/plane3.jpg');
iplane4.picture.loadfromfile('pics/plane4.jpg');
iplane5.picture.loadfromfile('pics/plane5.jpg');
iplane6.picture.loadfromfile('pics/plane6.jpg');
iplane7.picture.loadfromfile('pics/plane7.jpg');
iplane8.picture.loadfromfile('pics/plane8.jpg');
end;

Moderiert von raziel: Delphi-Tags hinzugefügt.
Moderiert von raziel: Topic aus Multimedia / Spiele / Grafik verschoben am Fr 17.06.2005 um 10:43

raziel · Verfasst: Fr 17.06.05 09:42

Mit

FINDCOMPONENT und einer for-Schleife lässt sich das ganz einfach in zwei Zeilen erledigen.

Gruß,
raziel

_________________
JSXGraph

Heiko · Beiträge: 3169 Erhaltene Danke: 11

Also so müsste es dann heißen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure tform1.main;
var i: Byte;
begin
 for i:=1 to 7 do
  begin
   TImage(FindComponent('iplane'+IntTostr(i))).Picture.loadfromfile('pics/plane'+IntToStr(i)+'.jpg')
  end
end;

Clever&Smart · Hält's aus hier Beiträge: 3

Danke das hat mir sehr geholfen aber ich hab noch eine Frage:
Wenn ich ein bild im jpeg format jede Sekunde in eine Timage Komponente Lade wie kann ich da das Flackern verhindern?

Heiko · Beiträge: 3169 Erhaltene Danke: 11

Wie mienst du das mir Aufrufen? Das z.B. jede Sekunde eine neue TImage-Komponente abgelegt wird?

Tana´Ri · Beiträge: 230

spontan evtl. mit TForm - DoubleBufferd (Anzeige)

_________________
mfg
Tana´Ri

Clever&Smart · Hält's aus hier Beiträge: 3

Tana´Ri hat folgendes geschrieben:

spontan evtl. mit TForm - DoubleBufferd (Anzeige)

Hab ich schon probiert das Flackern bleibt trotzdem

Heiko hat folgendes geschrieben:

Wie mienst du das mir Aufrufen? Das z.B. jede Sekunde eine neue TImage-Komponente abgelegt wird?

ja genau im prinzi so etwas:
for i:=1 to 9 do begin
image1.picture.loadfromfile('image'+inttostr(i)+'.jpg');
end;
wobei das image mit einer if abfrage sich auch mal nicht ändert deswegen stört das flackern

Heiko · Beiträge: 3169 Erhaltene Danke: 11

Ich glaube das Flackern bei den Komponenten lässt sich schlecht verhindern, da es an der Komponente liegt. Die IMage-Komponenten haben allgemein eine schlechte Bildaufbaugeschwindigkeit. Wenn du es mit GDI selber machen würdest, könntest du das flackern verhindern.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme