Zitat:
Also ohne begin, aber das geht ja leider nicht.
Nein?
Klar geht das solange man nur eine Funktion -> Aufruf im case verwendet.
Dein End hat da nichts zu suchen.
Delphi-Quellcode:
case bla of
0:
doSomething;
1:
doSomethingElse;
else
DefaultCode;
end;