|
Registriert seit: 8. Mär 2006
Ort: Jüterbog
491 Beiträge
Delphi 12 Athens
|
AW: Konstante in Konstante
25. Nov 2022, 08:53
Case mit Strings geht doch über IndexStr bzw. IndexText.
Delphi-Quellcode:
case IndexText(S, ['1', '2', '3']) of
0:
...
1:
...
3:
...
end;
|