Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi mit case bei Wert mehrere Anweisungen ausführen (https://www.delphipraxis.net/19490-mit-case-bei-wert-mehrere-anweisungen-ausfuehren.html)

Thorben86 4. Apr 2004 14:54


mit case bei Wert mehrere Anweisungen ausführen
 
Hi, ich wollt mal frage, ob man bei case of auch bei einem wert mehrere anweisungen geben kann, oder ob ich dass mit ner if-Anweisung machen muss?

Delphi-Quellcode:
Code in der if-Anweisung könnte zb so aussehen:

if i=0 then
begin
label1.caption:='1';
label2.caption:='2';
end
else if i=1 then
label3.caption:='3';

Bei case siehtsja normal so aus:

case i of
0: label1.caption:='1';
//<-- Hie müsste ja dann theoretisch noch das label2 stehen
1: label3.caption:='3';

Mirilin 4. Apr 2004 14:56

Re: mit case bei Wert mehrere Anweisungen ausführen
 
:hi:

Delphi-Quellcode:
  case i of
     0 :
     begin
       ...
     end;
     1 : ...
   end;
mfg Tobias

Thorben86 4. Apr 2004 15:04

Re: mit case bei Wert mehrere Anweisungen ausführen
 
Thx für die schnelle antwort, die idee war mir gerade auch gekommen :)

:dp:


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz