Entwickler-Ecke
Dateizugriff - Text in Textdatei schreiben
Iluj258 - Mo 28.09.09 13:38
Titel: Text in Textdatei schreiben
Hallo erstmal,
Ich habe ein Problem mit Delphi (genauer gesagt Embarcadero RAD Studio 2010 von meinem Vater^^)
Ich möchte gerne wenn ein Button gedrückt wir einen Text , den ich zuvor festgelegt habe in eine Textdatei schreiben. Wenn das erledigt ist will ich mit einem zweiten Button einen anderen Text in die nächste Zeile dieser Datei schreiben. Das soll ohne das überschreiben des ersten Texts passieren
Ich hoffe ihr könnt mir helfen
Gruß Iluj258
Moderiert von
Narses: Topic aus VCL (Visual Component Library) verschoben am Mo 28.09.2009 um 13:56
Moderiert von
Narses: Überflüssige Zeilenumbrüche/Leerzeilen entfernt.
Narses - Mo 28.09.09 14:00
Moin und :welcome: im Forum!
Und? Wie sehen deine Ansätze so aus? Hast du schon was ausprobiert? Code? ;) Du wirst doch wohl nicht davon ausgehen, dass wir dir fertigen Code liefern, oder? :zwinker:
Mal einen Ansatz zum Suchen:
TEDIT SPEICHERN :les: :think:
cu
Narses
Dude566 - Fr 09.10.09 14:35
Kannst ja doch deinen Vater fragen wenn ihm das RAD Studio gehört. :D
Naja ich würde mal sagen das ganze kannst du mit SaveToFile machen, kommt auch darauf an ob der Benutzer den Text wählen kann.
Andreas L. - Fr 09.10.09 15:22
Am einfachsten ist es wenn du eine TStringList verwendest.
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14:
| var sl: TStrings; begin sl := TStringList.Create; try sl.Add('Dein Text'); sl.Add('Zweite Zeile');
sl.SaveToFile('C:\test.txt'); finally sl.Free; end; end; |
Boldar - Fr 09.10.09 18:58
Andreas L. hat folgendes geschrieben : |
Am einfachsten ist es wenn du eine TStringList verwendest.
|
Da aber besser TStringList verwenden...
dummzeuch - Fr 09.10.09 19:10
Andreas L. hat folgendes geschrieben : |
Am einfachsten ist es wenn du eine TStringList verwendest.
|
Nein, am einfachsten geht es, wenn er assignfile/rewrite/append/writeln verwendet:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| var t: Textfile; begin AssignFile(t, Dateiname); Rewrite(t); WriteLn(t, 'Zeile 1'); CloseFile(t); end; |
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| var t: Textfile; begin AssignFile(t, Dateiname); Append(t); WriteLn(t, 'Zeile 2'); CloseFile(t); end; |
Boldar - Sa 17.10.09 19:21
Der übersichtlichkeit halber bzw. um einen Anfänger nicht mit polymorphie verwirren :)
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!