Caption in Stream speichern

[mirage228]

Hi,

ein kleines Beispiel:

Delphi-Quellcode:

var
  Stream: TFileStream;
begin
  Stream := TFileStream.Create('datei.erw', fmCreate); // bzw. fmOpenWrite, falls die Datei existiert
  try 
    WriteStringToStream(Stream, Edit1.Text);
  finally
    Stream.Free;
  end;
end;

Das ganze funktioniert natürlich mit allen anderen Stream (TMemoryStream, TStringStream, ...)

mfG
mirage228