TMemo und Tstringlist Datenübergabe beschleunigen?

**p80286**

Hallo zusammen,

Ausgangssituation ist ein TMemo was einige Tausend Zeilen enthält.
Zur Verarbeitung wir es in eine Stringliste kopiert, gelöscht und diese nach der Verarbeitung wieder in das Memo zurück kopiert.
Ausgerechnet der letzte Schritt dauert "ewig" was mach ich da falsch?

zusammenfalten · markieren

Delphi-Quellcode:

			  Memo1.lines.BeginUpdate;

  Liste.assign(Memo1.Lines);

  Memo1.Lines.Clear;

  for i:=liste.Count-1 downto 0 do begin

    (* machwas z.b.

      if pos(text,Liste[i])>0 then

        Liste.delete(i);

     *********************** *)

  end;

  Memo1.Lines.assign(Liste);

  Memo1.lines.EndUpdate;

Gruß
K-H

TMemo und Tstringlist Datenübergabe beschleunigen?

TMemo und Tstringlist Datenübergabe beschleunigen?

Forumregeln