Suchen und Löschen von Text in Memos

[himitsu]

Zitat:

For y := 0 to filelist.Count Do

Das ist etwas, welches ständig erwähnt wird.

Wenn der Index (hier y) über eine For-Schleife durchgezählt wird,
dann Löschen immer rückwärts
und Einfügen immer vorwärts,
(beim bloßen Verändern des Inhalts der Einträge ist es egal)
denn durch diese Operationen verschieben sich die Indize der Einträge.

Oder man nutzt eine While-Schleife und paßt den Index an.


1 und 2 sollen mit gelöscht werden:

Code:

0 1 2 3 4     A

y
0 1 2 3 4

  y
0 2 3 4

    y
0 2 3 4       U

      y
0 2 3 4

        y
0 2 3 4 -     I

          y
0 2 3 4 -     X

[/code]
A = Ausgangsbelegung
U = die 2 wird übergangen, da sie vorgerutscht ist, aber y weiterzählte
I = Out of Index, da das Schleifenende sich nicht anpaßt und nun ein Eintrag fehlt
X = erst Recht Out of Index, da .Count=5, aber der höchte Index um Eines kleiner war (0-basierender Index)

[Cumgrinder]

Zitat von himitsu:

Das ist etwas, welches ständig erwähnt wird.

Wenn der Index (hier y) über eine For-Schleife durchgezählt wird,
dann Löschen immer rückwärts
und Einfügen immer vorwärts,
(beim bloßen Verändern des Inhalts der Einträge ist es egal)
denn durch diese Operationen verschieben sich die Indize der Einträge.

Kleine Änderung große Wirkung!
Jetzt funktioniert das Programm nahezu perfekt.

[Cumgrinder]

Die Blacklist hat inzwischen fast 20000 Zeilen.
Wenn ich die Zeilen sortiere, kann ich den Vorgang dann beschleunigen ?

[himitsu]

Ja, denn die StringList hat für eine sortierte Liste eine besserer Suchmethode, welche durchschnittlich mit nur Log2(SL.Count div 2) Vergleichen einen String in der Liste finden kann.

Wärend es, bei einer unsortierten Liste, durchschnittlich (SL.Count div 2) Vergleiche nötig sind,
da im Extrem alle Strings/Zeilen geprüft werden müssen.

[Cumgrinder]

Was muss ich tun damit er den für die sortierten Listen optimierten Suchalgorithmus benutzt? Irgendeine Variable setzen?
Oder macht er das automatisch?

[himitsu]

Das geht automatisch.