Zeilenvorschub

[Christian_1980]

Hi,

ich habe folgendes Problem: Ich möchte einen String in eine Datei schreiben und dann einen Zeilenumbruch bewirken. Was muss ich am untenstehenden Code verändern?

mit Text := Text + #10#13 + nächster Text geht das nicht... kann mir da jemand helfen?

hier der Code:

Delphi-Quellcode:

var Datei: TFileStream;
    Text: String;
    Count: Integer;
begin
 Text := Edit1.Text;
 Count := Length(Text);
 try
  Text := Text
  Datei := TFileStream.Create('c:\WinNT\Temp\StreamTest.txt',fmcreate);
  Datei.WriteBuffer(Text[1], Count);
 finally
  Datei.Free;
 end;

Danke schonmal im Voraus für eure Hilfe

[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]