String in TStringList finden verschnellern?

[a.def]

Was haltet ihr denn davon. Ist das eine Lösung?
Speeding Up Delphi's TStringList.IndexOf

Ich nutze nun

Delphi-Quellcode:

function IndexOfListObjects(const sTmp: string; List: TStringListEx): Integer;
begin
 // for Result := 0 to List.Count - 1 do
 // if sTmp = PFileListEntry(List.Objects[Result])^.sFileName then

 if not List.Find(sTmp, Result) then
  Result := -1;
end;

[Fritzew]

Hallo

da Du ja den Filenamen schon in der Liste stehen hast

List.AddObject(aFileListEntry.sFileName, Pointer(aFileListEntry)); Könntest Du doch einfach mit

result := List.indexof(sTemp) danach suchen Wenn Die Liste dann auch noch sortiert ist geht das relativ schnell

ansonsten benutze doch ein Dictionary

[mjustin]

Wäre eine Lösung mit TDictionary (Generics.Collections) nicht wesentlich schneller, wenn die Anzahl wie angegeben in die Hunderttausende geht?

[himitsu]

Wurde schon erwähnt.

TDictionary ist eine sortierte Hash-Liste mit binärer Suche.