Memo Feld export nach CSV

[klaus9]

Hi,

ich habe ein Memo Feld und würde gerne den Inhalt exportieren zu einer CSV Datei, wie kann ich das machen ?

Gruß

[rwachtel]

Mit so einem Minimalset an Informationen kann die Antwort nur lauten:

Code:

.SaveToFile()

[klaus9]

Hi

ich habe in einem Memo Feld einen Text stehen darin auch eine Tabelle diese will ich gerne auslesen und als Excel csv speichern . Im Memo Feld beginnt die Tabelle bei dem Wort begin
Und hört auf bei Ende , den zwischen Text würde ich gerne kopieren und dann als csv speichern

Der Text im Memo ist in etwa so aufgebaut

Bla blubb usw
Bla Test
........
begin
Name Straße PLZ usw
Name1 Strauss plz1 usw
.....
.....
Ende


So sieht es in etwa aus

[haentschman]

Hallo...

da wirst du um selbst parsen und in Datei ablegen nicht herumkommmen...

PS: Ist das Memo für diese Art der Datenhaltung nicht denkbar ungeeignet ? Kannst du mal die Gründe für die Verwendung darlegen ?

[klaus9]

Hi,

also ich lese aus einer Webseite den Text aus und packe diesen in ein Memo und von dort aus werte ich die werte aus.. falls es eine einfachere Möglichkeit gibt, wäre ich sehr interessiert daran..

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..

Gruß
Klaus

[vagtler]

Ein Memo ist eine GUI-Komponente und dient zur Darstellung von Daten, nicht zur Haltung derselben.

Und ein Button kopiert Dir den den Text sicherlich nicht - das macht höchstens Dein Code, der auf einen Buttonclick reagiert. Und genau dort solltest Du auch ansetzen - was spricht dagegen, die Daten nach dem Herauslesen an einen Parser zu übergeben? Wofür genau brauchst Du das Memo?

Und bitte gewöhne Dir eine klare Ausdrucksweise an - das gilt ganz besonders für die Darlegung Deiner Anforderungen und Probleme!

[Popov]

Zitat:

Zitat von klaus9 (Beitrag 1152847)

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

[vagtler]

Zitat:

Zitat von Popov (Beitrag 1152853)

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

Auf Grund der mangelnden Anforderungsdarstellung würde es mich aber nicht wundern, wenn die Einträge gar nicht per Tab getrennt sind und der Threadersteller auf massive Probleme stößt, die Zeilen zu parsen (ich denke da nur an Straßennamen, die Leerzeichen enthalten wie z.B. Aachener Straße).

Aber solange Klaus sich da in Schweigen hüllt und wir bestenfalls nur häppchenweise Informationen bekommen ist das alles nur Spekulation.

[klaus9]

hi

ich glaub ich habe noch ein Problem.. ich müßte glaub ich erstmal richtig parsen..

Hat jemand da eine Idee wie ich z.B. in einer Webseite ein Table auslesen kann, vielleicht geht es ja doch einfacher als über in memo.

[vagtler]

Zitat:

Zitat von klaus9 (Beitrag 1152857)

[...] Hat jemand da eine Idee wie ich z.B. in einer Webseite ein Table auslesen kann, [...]

Laut Deinen Informationen machst Du das doch schon.

Ich glaube, Du meinst etwas ganz anderes. Aber Du scheinst nicht in der Lage oder Willens zu sein, Deine Problemstellung genau und vollständig(!) zu formulieren.