Zeilen Umkehren, von unten nach oben

[Chakvour]

Hallo,

gibt es ein kleines Tool, das Zeilen von unten nach oben einmal umkehrt?
Also Beispiel wäre so

import

• 1
• 2
• 3

export

• 3
• 2
• 1

Habe schon über Google gesucht, vllt habe ich falsche Suchwörter eingegeben.
Aber ich kann mir nicht vorstellen das es sowas nicht gibt.

[kaiser1401]

Schau dir doch mal TStringlist mit LoadFromFile / SaveToFile (o.ä.) an, dann hast es ganz schnell selbst: Eine öffnen, einlesen, 2. erzeugen und dann mit for i = count-1 downto 0 ..... durch die erste durchlaufen und in die 2. einhängen

Edit: Funktionsnamen korrigiert

[DeddyH]

Das ist doch schnell selbst geschrieben. Am einfachsten 2 Stringlisten und in einer for-downto-Schleife aus der Source- in die Dest-Liste kopieren.

[Chakvour]

Sorry, aber ich benutze noch gar nicht so lange Delphi und kenn mich da nicht soweit aus.
Hatte ich bereits in einem anderen Thread auch geschrieben :)

Ich fragte ja nach einem Tool.

[kaiser1401]

Dann kannst du das ja hiermit als ersten Ansatz ganz gut lernen ;-)

Weißt du wie du ein Formular mit einem Button und 2 Edits erstellst?

Wenn ja, schau mal in die Hilfe zu TStringlist und mach beim Buttonclick was schon angedeutet wurde. aus den Edits ließt du dann Source und Ziel-dateipfad.

[Chakvour]

Ok ich schau mal :)
Melde mich dann ^^

Edit: Ich habs nun sowiet das ich sie eingelesen bekomme in die TListBox
Nun komme ich nicht weiter wie ich den kompletten inhalt einmal umkehre

[kaiser1401]

Wenn du die daten in eine Stringlist eingelesen hast kannst du durch sie hindurch iterieren und in die neue Liste schreiben (Stringlist oder in deinem Fall jetzt vll auch ListBox)

Delphi-Quellcode:

for i:= EingangsListe.Count-1 downto 0 do
 begin
  Ausgangslite.items.add(Eingansgliste.items[i]);
 end;

Hilft dir das schnippsel?

Edit: Bei einer Stringlist sind es "strings" statt "items"

[Chakvour]

Ich möchte ja keine komplette Datei umkehren. Das geht ja nicht, das macht den Inhalt kaputt.

Sondern in der Datei befinden sich zeilen, die ich selber kopiere und dann in das programm kopiere. RichEdit
Und dann per Button den Inhalt umkehre. Mehr wollte ich eigentlich gar nicht ^^

[DeddyH]

Wer hat denn etwas von einer Datei gesagt?

[Sir Rufo]

Zitat:

Zitat von Chakvour

Ich möchte ja keine komplette Datei umkehren. Das geht ja nicht, das macht den Inhalt kaputt.

Sondern in der Datei befinden sich zeilen, die ich selber kopiere und dann in das programm kopiere. RichEdit
Und dann per Button den Inhalt umkehre. Mehr wollte ich eigentlich gar nicht ^^

Aber was dabei umgekehrt wird, hängt doch davon ab, was du zum Umkehren übergibst.

Ganz Datei - Ganze Datei wird umgekehrt
3 Zeilen - 3 Zeilen werden umgekehrt
Ganze Welt - Ganze Welt steht Kopf