Einzelnen Beitrag anzeigen

Benutzerbild von Kedariodakon
Kedariodakon

Registriert seit: 10. Sep 2004
Ort: Mönchengladbach
833 Beiträge
 
Delphi 7 Enterprise
 
#1

With ... do Anweisungen....

  Alt 23. Sep 2004, 01:04
So habe mir mal gedacht ich mache meine 30 Labels alle auf einmal leer, aber scheiße was...

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  with Label1, Label2, Label3 {...Hier gings noch weiter :) ...} do Caption := '';
end;
Aber geändert wurde nur das letzte Label
Ich hatte gedacht der macht das mit allen...

Wie bokomm ich das hin das er alle 30 Label leer macht? ohne jedes einzelne leer zu machen?

MFG Keda
Christian
  Mit Zitat antworten Zitat