Delphi-Quellcode:
Case AnsiIndexText(S, ['Str1', 'Str2', 'Str3']) of
0: {Str1};
1: {Str2};
2: {Str3};
End;
Gehe ich Recht in der Annahme, dass ich mir die Funktion AnsiIndexText
für Delphi 2009 Pro selbst schreiben muss?
Im Internet StringToCaseSelect gefunden.
Gruß
Alfred