Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
| procedure TForm1.Nachlegen(Zahl:integer);
var i:integer;
name, name2: string;
begin
for i:=Zahl+1 to 14 do begin
Name := 'S1K' + inttostr(i-1); Name2 := 'S1K' + inttostr(i); ......
......
......
end;
end; |
Es handelt sich bei meinem Spiel um ein Kartenspiel.
Diese Procedure ist von mir selber verfasst sie soll dafür sorgen dann wenn eine Karte aus der Hand verschwindet die Karten Rechtsdavon alle ein Feld sozusagen nach links rutschen.
Das ganze habe ich mir so vorgestellt das ich es mti einer for schleife mache da durch die procedure ja die Variable Zahl mit rein kommt(dabei handelt es sich um die entfernte nummer der Karte) Sollten nur ja alle anderen Nummern der Karten erreichbar sein.
Name steht somit für die Karte wo die Karte von Name2 hinsoll.
und des was etz in Name steht ist der name von dem Bild sozusagen.
Etz die Frage wie kann ich es machen das der Compilier etz versteht wenn ich schreib
Name.Picture, dass damit der Inhalt von Name gemeint ist?
Also:
zum Beispiel
S1K3.Picture für Name
und
S1K4.Picture für Name2
Mal vereinfacht nicht genua auf mein Programm aber mein TImage heißt S1K1
ich möchte etz aber nicht schrieben
S1K1.Picture.LoadfromFile('blablabla');
sondern davor eine Variable bestimmen Name heißt und den Inhalt hat S1K1
udn dann
halt zum Beispiel des so darstellen:
Name.Picture.Loadfromfile('blablabla');
blos Name soll hal umgewandelt werden in S1K1
mfg Jo
