Delphi fallen durch in case-Anweisung

Question

In C können Sie so etwas wie

switch(x) { 
    case 'a': 
    case 'b': 
    printf("something"); 
    break; 
    case 'c': 
    printf("else"); 
    break; 
} 

während in Delphi zu tun habe ich versucht, sowohl

case x of 
    'a': 
    'b': writeln('something'); 
    'c': writeln('else'); 
end; 

und

case x of 
    ['a','b']: writeln('something'); 
    'c': writeln('else'); 
end; 

aber beide von ihnen nicht Arbeit.

ich von verschiedenen Lösungen, z.B. ich schreibe eine Prozedur und nenne sie sowohl für 'a' als auch für 'b', aber ich habe mich gefragt, ob es eine bessere Lösung gibt. Ich könnte auch eine goto wie folgt verwenden:

case x of 
    'a': goto labelCaseB; 
    'b': begin 
      labelCaseB: 
      writeln('something'); 
     end; 
    'c': writeln('else'); 
end; 

und es funktioniert perfekt, aber was ist der „Standard“ Lösung für den Fall durch in der Case-Anweisung in Delphi?

Natürlich mein eigentlicher Fall ist viel komplizierter: Im Beispiel würde ich verwendet habe eine if-else;)

Answer 1

Delphi muss nicht durch die Fall Aussagen fallen. Es ist einer der Hauptunterschiede zwischen C und Delphi. Aber in Ihrem Fall (sorry über das Wortspiel) Sie können schreiben

case x of 
    'a','b': begin 
      writeln('something'); 
     end; 
    'c': writeln('else'); 
end;