DBGrid-Daten in Textdatei kopieren?

[Hans-Jürgen Schmid]

Hallo! Spezialisten<B>
Ist es möglich, drei Spalten einer DBGrid<B>
in eine Textdatei zu kopieren?<B>
Und wie sieht der Code aus?<B>

In DBGrid wird mit:<B>
<B>
<PRE>
procedure TForm1.Table1CalcFields(DataSet:TDataSet);<B>
Begin<B>
Table1['Zusafassung'] := Table1['ergebnis1']+ <B>
';' + Table1['ergebnis2']+';' + <B>
Table1['ergebnis3']+';';<B>
end;<B>
</PRE>
drei Zahlen, jeweils 3 oder 4 stellig<B>
(aus drei DBEdit-Felder)<B>
ergebnis1, ergebnis2 und ergebnis3,<B>
transferiert. Das Geht!<B>
Nun will ich diese dreispaltige<B> Zahlenkolonne so in eine Textdatei kopieren<B>
Soll so aussehen:<B>
z.B.<B>
2001;3002;7000;<B>
300;6001;1445;<B>
usw<B>
Wäre super, wenn das gehen würde!<B>
Dank im Voraus!<B>
Gruss Hans-Jürgen.<B>

[Michael Koecher]

Hallo,<br>also wenn ich das richtig verstanden habe, dann könntest Du im allereinfachsten Fall ein Memo (visible := false) auf Dein Form legen.<br>Dann einfach:<PRE>
Memo1.wordwrap := false;
Memo1.clear;
memo1.lines.add(Table1['ergebnis1']+';' +Table1['ergebnis2']+';' +Table1['ergebnis3']';';
memo1.lines.savetofile('Textfile.txt');
</PRE>
<br>Du kannst natürlich das Memo lassen und ein Textfile öffnen, siehe mal in der Hilfe nach "rewrite" <br><br>Michae

[Hans-Jürgen Schmid]

Hallo Michael,<BR>
vielen Dank für deine schnelle Hilfe!<BR>
Geht wunderbar!<BR>
Gruß Hans-Jürge