|
Registriert seit: 1. Apr 2005
Ort: Bad Tölz
4.149 Beiträge
Delphi 2006 Professional
|
Re: Strings und Case of
2. Mär 2007, 23:06
Das is ja bei dir noch viel einfacher...
Delphi-Quellcode:
gesetzt := AnsiIndexStr(['Karo 7'],['Karo 8']{,...})+1;
if gesetzt = -1 then
gesetzt := 0;
Lukas Erlacher Suche Grafiktablett. Spenden/Gebrauchtangebote willkommen.
 Gotteskrieger gesucht!
For it is the chief characteristic of the religion of science that it works. - Isaac Asimov, Foundation I, Buch 1
|