Control name per variable?

[softtouch]

Schwer zu erklären, aber sagen wir mal, ich habe 3 TEdit, mit den name edit1, edit2 und edit3.
Gibt es eine Möglichkeit, auf diese in einer Schleife zuzugreifen, indem der Control Name in einer variablen steht?

Delphi-Quellcode:

Pseudo code:

for i:=1 to 3 do
begin
controlname:='edit'+i.tostring;
end;

Wie kann ich auf das Control mit dem Namen controlname zugrifen um properties zu setzen (text zum Beispiel)?
Ich kann ja schlecht controlname.text nutzen.

[himitsu]

Self.FindComponent(dername)

nach Owner -> TComponent.FindComponent
nach Parent -> TWinControl.FindChildControl (nicht mit FindControl)

[softtouch]

Zitat von himitsu:

Self.FindComponent(dername)

nach Owner -> TComponent.FindComponent
nach Parent -> TWinControl.FindChildControl (nicht mit FindControl)

Danke, habe ich auch gerade gefunden. Funktioniert wunderbar.

[dummzeuch]

Oder einmalig (im Constructor) ein Array füllen, so dass man danach einfach per Index in dieses Array auf die Controls zugreifen kann. Dann ist man auch nicht darauf angewiesen, dass die Namen durchnummeriert sind.

[Sherlock]

Dann würde ich doch eher zu einem Dictionary tendieren. Da kann man dann den Namen dem Objekt gegenüberstellen. Ähnlich wie im Emba Beispiel zu Dictionaries: https://docwiki.embarcadero.com/Libr...nary#Iteration

Sherlock

[himitsu]

Ein Array mit ENUM ist im Code auch nett.

Zugriff per compiler-prüfbaren Namen
und die Möglichkeit mit FOR früberzulaufen.

Delphi-Quellcode:

type
  myControls = (mcEdit1, mcEdit2, mcEdit3);
var
  theControls: array[myControls] of string;