Ich weiß es nicht, aber dies funktioniert bei mir wunderbar:
Delphi-Quellcode:
procedure TfrmHauptBaseForm.Button1Click(Sender: TObject);
var
ms:TMemoryStream;
str:string;
begin
str:='Test';
ms:=TMemoryStream.Create;
ms.Write(str[1],Length(str));
ms.SaveToFile('c:\tst.txt');
ms.Free;
end;
Mann muss unbeding die Adresse des ersten Zeichens (str[1]) übergeben und nicht die Adresse des Strings.