Code beschleunigen

[Grolle]

Hallo nochmal und Danke an alle,

nachdem meine Funktion in der letzten Nacht 8 h für 1000 (das war nur ein/Fünftel!) Datensätze
gebraucht hat, habe ich die betroffene Excel-Spalte als Textdatei gespeichert und nach Bearbeitung
einfach wieder in Excel eingefügt (zum Glück lagen keine Formatierungen bzw. Formeln
darauf).
Der Code macht die gesammte Liste jetzt in einer Minute:

Delphi-Quellcode:

  for i := 0 to sl.Count-1 do
  begin
    Label6.Caption := IntToStr(i);
    Label6.Refresh;
    if sl[i] <> '' then
    begin
      arr := explode(';',sl[i]);
      for j := 0 to nuList.Count-1 do
      begin
        help := StringReplace(nuList[j],arr[0],arr[1],[rfReplaceAll]);
        nuList[j] := help;
      end;
    end;
  end;

Unglaublich, was Excel da an Performance schluckt

Viele Grüße ...