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