Hallo,
umd die vorherigen Beiträge zu kombinieren:
Delphi-Quellcode:
const LabelZahl = 5; // Kannst du festlegen
var Labels: Array[1..LabelAnzahl] of TLabel;
(********************)
// onFormCreate:
var N: Cardinal;
begin
for N := 1 to LabelAnzahl do
Labels[N] := (Form.FindControl('Label' + IntToStr(N)) as TLabel);
end;
(********************)
// irgendeine Prozedur:
var N: Cardinal;
begin
for N := 1 to LabelZahl do
Labels[N].Caption := 'XYZ';
end;
Diesen Code würde ich aber
nur verwenden, wenn wirklich so viele Labels auf dem Formular sind wie die Konstante LabelZahl ist.
Gruß,
ManuMF