Stringlist.find funktioniert nicht richtig

[braunbär]

Ich stehe vor einem Rätsel. Plötzlich werden Datensätze, die in der Stringlist vorhanden sind, nicht mehr gefunden. Die Stringlist ist natürlich sortiert.

Dieses Programmstück:

Code: Alles auswählen

    debug('Stringlist: Key='+Key); debug(sl.DelimitedText);
    if sl.find(Key,i)
    then begin sg.row:=i+1; debug ('Key gefunden'); end
    else begin sg.row:=1; debug('Key nicht gefunden') end;

liefert folgende Debugausgabe:

Code: Alles auswählen

Stringlist: Key=1400
"1200=Test	1030	Wien	789456123		0","1201=Franz Müller	1190	Wien	467245		0","1400=Schnurz	1010	WIen	1234		0",...
Key nicht gefunden
------------------------------------------------------------------

Der dritte Datensatz der Stringlist hat den Schlüssel 1400, trotzdem liefert sl.find offenbar den Wert false. Der Schlüsselwert 1400 hier dient nur als Beispiel, sl.find liefert immer false, egal, welchen Wert man sucht.

Dazu kommt jetzt ein weiteres Problem. Ich wollte mir im Debugger anschauen, was das find hier genau macht, aber F7 geht nicht in die find Routine hinein, sondern springt von der Zeile "if sl.find" direkt in den else Zweig der Abfrage.

[Sieben]

Sucht Find nicht (wie IndexOf) nach dem ganzen String, so dass du für deine Suche IndexOfName bemühen müsstest...?

[braunbär]

Tut es...
Unglaublich, was man nach einer längeren Programmierpause für Fehler machen kann...

Danke

[Sieben]

Yes, I know...