title image


Smiley Re: Labels mittels integer in einer Schleife ansprechen
var I: Integer;

begin

for I:= 0 to Form1.ComponentCount - 1 do begin

if Form1.Components[I].ClassName = 'TLabel' then begin

TLabel(Form1.Components[I]).Caption:= IntToStr(I);

end;

end;

end;

  Mail an Codehunter schreiben (Keyword für Whitelist im Betreff lassen!)


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: