Thema: Label[i]

Einzelnen Beitrag anzeigen

Benutzerbild von bernau
bernau

Registriert seit: 1. Dez 2004
Ort: Köln
1.294 Beiträge
 
Delphi 12 Athens
 
#13

AW: Label[i]

  Alt 3. Apr 2018, 12:49
Oder einfach eine Funktion basteln, die mir die Labels übergibt.

Damit bist du unabhängig von der Namensgebung deiner Labels und kannst gezielt nur die Labels ansprechen, die wirklich benötigt werden, wenn noch mehr Label auf deiner Form vorhanden sind.

Delphi-Quellcode:

Function TForm1.GetLabel(aIndex:Integer):TLabel;
begin
  case aIndex of
    1:Result := Label1;
    2:Result := Label2;
    3:Result := LabelXYZ;
    4:Result := Labelqqq;
    5:Result := LabelWasWeisIch;
  else
    Result := nil; // Oder eine Exception
  end;
end;
Gerd
Kölner Delphi Usergroup: http://wiki.delphitreff.de
  Mit Zitat antworten Zitat