Variable als Name nutzen

[Liam]

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;

[Delphi-Laie]

Was ist F1112? Ein Button?

Und was heißt "irgendwie funktioniert das nicht so recht" konkret?

[silver-moon-2000]

Zitat:

Zitat von Liam (Beitrag 1160588)

Ich habe vor, den Namen von Objekten als eine Variable zu nehmen und damit dinge anstellen.

Wenn ich Dich richtig verstanden habe, sollte FindComponent Dein Freund sein.

[Sir Rufo]

und bitte nicht so was

Delphi-Quellcode:

if F1111.checked = true then

denn das hier

Delphi-Quellcode:

if F1111.checked then

ist nicht nur kürzer und sprachlich verständlicher ("wenn irgendwas.markiert dann") sondern wird auch in jeder Lebenslage funktionieren

[Liam]

Zitat:

Zitat von Delphi-Laie (Beitrag 1160591)

Was ist F1112? Ein Button?

So heißt das Objekt, in diesem Falle ein Imagefeld ;) Dahinter steckt schon ein System (F - Feldnummer - x/y Koordinate - Ebene)

Und mit Nicht recht Funktionieren mein ich die Stringaddition, woraus sich der Name des anzusprechenden Objektes ergibt, was durch Visible:=false unsichtbar gemacht werden soll ;)


Danke, ich schau mir mal FindComponent an (=

Zitat:

Zitat von Sir Rufo (Beitrag 1160595)

und bitte nicht so was

Delphi-Quellcode:

if F1111.checked = true then

denn das hier

Delphi-Quellcode:

if F1111.checked then

ist nicht nur kürzer und sprachlich verständlicher ("wenn irgendwas.markiert dann") sondern wird auch in jeder Lebenslage funktionieren

Danke, wusst ich bisher noch nicht (=

[Bummi]

Das was ich meine verstanden zu haben klingt für mich als ob Du die Komponenten zur Laufzeit in eine Objektliste oder ein Array (of Array) of TObject erstellen und generische Methoden zuweise solltest ...