Verzweigung

[Der_Unwissende]

Zitat von Nicolai1605:

Als eine einfache Optimierung könntest du das auch wie folgt schreiben

Delphi-Quellcode:

if (LE = 'h') then 
   begin
   case zustand of
     1: ...
     2: ...
     3: ...
     4: ...
     5: ...
   end;
   end;

Das würde das ganze etwas verkürzen.

In dem Beispiel geht es noch kürzer:

Delphi-Quellcode:

if (LE = 'h') then 
   case zustand of
     1, 3 : zustand := 2;
     else zustand := 5;
   end;

Gruß Der Unwissende