StringList Textblöcke verschieben

[p80286]

Zitat von Delphi.Narium:

Deine Routine dürfte nur dann korrekt arbeiten, wenn targetline > startline ist.

Davon bin ich ausgegangen! ???

Gruß
K-H

[stahli]

Ich könnte mir vorstellen, dass es i.d.R. performanter (und einfacher) ist, die Zeilen einfach komplett abschnittsweise in eine neue StringList zu kopieren.

Die Verschiebeaktionen mit Delete und Insert halte ich für recht (zeit)aufwendig.

Das konkrete Ergebnis hängt aber sicher auch immer von der Länge der StringList und des zu verschiebenden Blockes ab.

[DieDolly]

Die Blöcke haben maximal 30 Zeilen und die Datei ist bis zu 80000 Zeilen lang.

[Delphi.Narium]

Bei der Menge kann die Kombination aus Insert und Delete schon deutlich in die Laufzeit gehen.

[DieDolly]

Ich habe gerade das Beispiel von der vorherigen Seite getestet mit dieser Datei

Zitat:

1
2
3
4
5

6
7
8
9
10

11
12
13
14
15

Und diesem Aufruf und ich bekomme den Out of bounce Fehler
VerschiebeZeilen(sl, 5, 6, 18); // Block 5-10 soll nach 15 verschoben werden Wenn ich 0, 5, 10 eingebe, kommt das hier als Ergebnis. Scheint etwas wackelig zu sein

Zitat:

6
7
8
9
10

11
12
13
14
6
7
8
9
10

15