Dann aber auch noch gleich ein echtes ELSEIF, welches ich persönlich sehr vermisse.
Du mein ein CASE-OF?
Ja, ein CASE für nicht-ordinale Typen wäre bestimmt auch nett.
Und dann noch nicht-konstante Werte im CASE.
Das ist ja nicht so ganz der Renner:
Delphi-Quellcode:
case IndexStr(S, ['aaa', 'bbb', 'ccc']) of
0{aaa}: ...;
1{ddd}: ...;
2{ccc}: ...;
end;