Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.691 Beiträge
 
Delphi 11 Alexandria
 
#38

AW: ANSISTRING unter Linux verfügbar ???

  Alt 16. Jun 2018, 11:24
Delphi-Quellcode:
    if SaveString <> 'then
      FS.Write(Pointer(SaveString)^, Length(SaveString) * SizeOf(AnsiChar));
wie lautet hier die Lösung um unter beiden Plattformen mit einer CodeVariante auszukommen ?
Delphi-Quellcode:
procedure SaveBytesToFile(const Data: TBytes; const FileName: string);
var
  stream: TBytesStream;
begin
  stream := TBytesStream.Create(Data);
  try
    stream.SaveToFile(FileName);
  finally
    stream.Free;
  end;
end;
So vielleicht? In der Hoffnung es gibt mit Linux auch TBytesStream?
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat