Label??.Caption

[Fritz01]

Hallo,
in einer while-Schleife wird bei jeden Durchlauf ein Name gesucht und gefunden. Diese Namen sollen einem Label übergeben werden. Die Label sind in einer Form vordefiniert von Label1 bis Label65.
Es soll so sein, dass beim 1. Duchlauf der Name in Label1.Caption, beim 2. Durchlauf in Label2.Caption usw. abgelegt wird. Wie kann ich das realisieren? Mehrfache Versuche blieben bisher Erfolglos.
Fritz

[mkinzler]

Such mal nach .FindComponent()

[SirThornberry]

das sinnvollste wäre die Labels dynamsich zu erstellen und in einem Array anzusprechen.

[Fritz01]

Hallo,
danke für die superschnellen Antworten.

@ mkinzler,
habe erst mal nach .FindComponent() in der DH geschaut. Da gibts ja auch ein Beispiel. Analog dazu habe ich

Delphi-Quellcode:

Const
Name = 'lbl';

und um zu sehen was dabei herauskommt

Delphi-Quellcode:

ShowMessage(TLabel(FindComponent(Name + IntToStr(i))));

in mein Prog eingefügt.
Es erscheint die Fehlermeldung: Inkompatible Typen 'String und TLabel'
Was habe ich da falsch gemacht?

Fritz

[ste_ett]

ShowMessage() erwartet einen String. :)

Delphi-Quellcode:

ShowMessage(TLabel(FindComponent(Name + IntToStr(i))).Caption);

[DeddyH]

Delphi-Quellcode:

for i := 1 to 65 do
  TLabel(FindComponent('Label' + inttostr(i))).Caption := Name[i];

Wobei ich davon ausgehe, dass Name ein Array, eine StringList o.ä. ist. Sollte es nur eine einfache Variable sein, das [i] einfach weglassen ;)

[edit] Da war wieder jemand schneller ;) [/edit]

[dominikkv]

Delphi-Quellcode:

ShowMessage((FindComponent('Label' + IntToStr(i))as TLabel).Caption);

edit: hehe... suchs dir aus xD

[Fritz01]

@ all,
danke Euch für die schnellen und hilfreichen Antworten, habt mir super geholfen, es läuft.
FindComponent war mir unbekannt, bin kein Profi sondern ein ewiger Anfänger und um jede Hilfe sehr dankbar. Man lernt immer noch dazu!

Wünsche Euch noch eine schöne Adventszeit, ein besinnliches Weihnachtfest und einen guten Rutsch ins Neue Jahr.

Fritz

[DP-Maintenance]

Dieses Thema wurde von "SirThornberry" von "Datenbanken" nach "VCL / WinForms / Controls" verschoben.