Einzelnen Beitrag anzeigen

Benutzerbild von Aya
Aya

Registriert seit: 24. Jul 2003
Ort: Kassel
138 Beiträge
 
Delphi 6 Professional
 
#3

Re: Mehrere Anweisungen ausführen bei case ... of ?

  Alt 22. Aug 2003, 02:39
Hi,

schonmal begin/end gehört? *grinst frech*

Delphi-Quellcode:
case i of
  1: begin
       tueirgendwas1;
       tueirgendwas2;
       tueirgendwas3;
     end;
  2: begin
       tueirgendwas1;
       tueirgendwas2;
       tueirgendwas3;
     end;
  3: begin
       tueirgendwas1;
       tueirgendwas2;
       tueirgendwas3;
     end;
end;
Au'revoir,
Aya~
I aim for my endless dreams and I know they will come true!
S: String = #86^)^3^)^4#58#32^(^4^4^0#58#47#47^7^7^7#46^+^/^3^(^)^'^!^9^!#46^$^%;
  Mit Zitat antworten Zitat