Hallo zusammen,
ich habe eine Stringlist mit ca. 80.000 Einträgen, die ich während eines Datenimports je nach Anzahl der Datensätze zwischen 5000 und 20.000 mal durchsuchen muss.
Pro Datensatz dauert der Test etwa 0,5 - 0,8 Sekunden.
Gibt es eine Lösung, um das Vorhandensein eines Eintrags schneller zu prüfen als so .... ?
Delphi-Quellcode:
function IstGesperrt(SL:TStringlist;SuchString:String):Boolean;
begin
if sl.IndexOf(Suchstring)>-1 then
result:=true else
result:=false;
end
// Verwendung
While not ImportDataset.eof do
begin
if not IstGesperrt(ImportDataset.fieldbyname('Stringfeld')) then ... Machwas;
ImportDataset.next;
end;
Schöne Grüße,
Jens
