Einzelnen Beitrag anzeigen

Benutzerbild von TheMiller
TheMiller

Registriert seit: 19. Mai 2003
Ort: Gründau
2.480 Beiträge
 
Delphi XE7 Architect
 
#3

Re: Labels in Schleifen einbinden -> wie?

  Alt 24. Apr 2004, 09:16
Hey super, danke!

Funzt. Und zwar so:

Delphi-Quellcode:
procedure TEditTag.Button6Click(Sender: TObject);
var i:Integer;
begin
for i:=1 to 19 do begin
  TLabel(FindComponent('Label'+IntToStr(i))).Visible:=False;
 end;
end;

end.
Ok, bye!
  Mit Zitat antworten Zitat