Hello Friends,
ich schreibe in meinem Custom File ein Paar Strings via Filestream. Aber es kommt immer eine Leerzeichen nach jedem Char.
Es sollte LAMP schreiben aber es schreibt L A M P
Delphi-Quellcode:
procedure TForm1.btn1Click(Sender: TObject);
var
fs: TFileStream;
begin
fs := TFileStream.Create('C:\Test1.depp',
fmCreate or fmOpenWrite or fmShareDenyWrite);
try
fs.Position := 23 ;
fs.WriteBuffer((Char($4c))+(Char($41))+(Char($4d))+(Char($50)),8);
finally
fs.Free;;
end;
end;
Wie kann ich LAMP (ohne Leerzeichen) schreiben ?
Thanks in advance
