Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
Delphi 10.2 Tokyo Enterprise
|
Re: Satz in Datei schreiben ohne Satzende (CR+LF)?
4. Aug 2004, 12:27
z.b. so
Delphi-Quellcode:
type
//Nur ein bsp. man kann auch ein Longstring nehemen
TBuffer = record
text1 : String[255];
text2 : string[93];
end;
var
stream : TFileStream;
buffer : TBuffer;
begin
stream:=TFileStream.Create('test.txt');
try
buffer.text1:='text';
buffer.text2:='text2';
stream.Write(buffer,SizeOf(TBuffer));
finally
stream.Free;
end;
end;
Frank Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
|