Einzelnen Beitrag anzeigen

Popov
(Gast)

n/a Beiträge
 
#7

AW: Memo Feld export nach CSV

  Alt 25. Feb 2012, 22:09
Also ich habe einen Button der mir den Html Outertext kopiert und mir dann halt in ein Memo einfügt und dann wollte ich jetzt gerne den herauskopierten text auswerten und in eine csv datei schreiben..
Also jetzt hast du drei mal nacheinander die gleiche Frage gestellt ohne sie zu konkretisieren.

also du beginnst am besten mit for i := 0 to Memo1.Lines.Count - 1 do an.

Zuerst löscht du den Bereich vor der Tabelle

Dann löscht du den Bereich nach der Tabelle

Im Block gehst du nun mit Memo1.Lines[i] Zeile für Zeile durch (ich kürze das ab in dem ich die Zeile als s Bezeichne)

Den s String bearbeitest du mit for k := 1 to Length(s)

Am Anfang s fügst du ein " Anführungszeichen Zeichen ein

Weiterhin suchst du in s nach Tab-Zeichen, die ersetzt du mit "," (Anführungszeichen Komma Anführungszeichen)

Ans Ende s fügst du du ein " Anführungszeichen Zeichen ein

Das Alles Zeile für Zeile

Das alles dann mit Memo1.Lines.SaveToFile(c:\date.csv'); speichern
  Mit Zitat antworten Zitat