Label[i]

[himitsu]

Delphi-Quellcode:

HardCast := TLabel(FindComponent('Label' + IntToStr(i)));  // weißt einfach zu, ohne den Typ zu prüfen
SoftCast := (FindComponent('Label' + IntToStr(i)) as TLabel);  // knallt, wenn es kein Label ist (NIL ist aber erlaubt, da es ja kein "falscher" Typ ist)
if FindComponent('Label' + IntToStr(i)) is TLabel then ...;  // prüft ob der Typ stimmt (nil ist nicht möglich, da nicht dieser Typ drin ist)