Hallo Leute.
Ich habe vor, den Namen von Objekten als eine Variable zu nehmen und damit dinge anstellen. Anschließend soll die Variable wieder zum Namen werden. Doch irgendwie funktioniert das nicht so recht. Hat einer eine Idee?
Ich muss dazu sagen, dass das F1112.Visible:=true; auch mit Variablen gemacht werden soll.
Delphi-Quellcode:
var
Form1: TForm1;
a,b: string;
c: integer;
implementation
procedure TForm1.F1112Click(Sender: TObject);
begin
if F1111.checked = true then
F1112.picture.loadfromfile('source\treffer.bmp')
else
F1112.Picture.loadfromfile('source\vorbei.bmp');
end;
procedure TForm1.StartClick(Sender: TObject);
begin
a:=F1111.Name;
b:=copy(a,2,4);
c:=strtoint(b);
repeat
'F' + inttostr(c).Visible:=false;
F1112.Visible:=true;
c := c+1;
until c=1411
end;