Dankeschön, aber es geht leider noch nicht !
Also ich habe jetzt folgende Änderung vorgenommen:
Delphi-Quellcode:
var Datei: TFileStream;
sBeispiel:
String;
Count: Integer;
begin
sBeispiel := Edit1.Text;
Count := Length(sBeispiel);
try
sBeispiel := sBeispiel + #13#10 + '
nächste Zeile';
Datei := TFileStream.Create('
c:\WinNT\Temp\StreamTest.txt',fmcreate);
Datei.WriteBuffer(sBeispiel[1], Count);
finally
Datei.Free;
end;
end;
Ok, an den Präfix hätte ich auch denken müssen. Dennoch: Wenn ich mir die Datei nach dem Ausführen des Codes mit dem Editor Ansehe, gibt es nur eine Zeile - nämlich den Beispieltext aus dem Editfeld. Zeilenvorschub und Text "nächste Zeile" wurden nicht in die Datei geschrieben. Woran das liegt ist mir nicht klar, ihr sagt ja selbst, dass es so gehen müsste.
Woran kann es sonst evtl noch liegen?
Christian
[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]