Moin !
Ich habe folgende Procedure:
Delphi-Quellcode:
procedure TForm10.dxBarButton6Click(Sender: TObject);
var fs: TFileStream;
ms: TMemoryStream;
begin
ms := TMemoryStream.Create; // Memory Stream für Objekt erzeugen
fs := TFileStream.Create('test.dat',fmCreate); // Filestream erzeugen in dem alles abgelegt wird
aqDockingManager1.SaveToStream(ms); // aqDockingManager1 - Daten in dem Stream ablegen
fs.WriteBuffer(ms, ms.Size); // aqDockingManager1 abspeichern
fs.Free;
ms.Free;
end;
Wenn ich das debugge dann kann ich feststellen das im MemoryStream MS alles sauber drin steht. Nämlich die Infos von DockingManager1. Wenn ich mir dann aber die Datei ansehe die durch TFileStream erzeugt wird, dann steht da was gänzlich anderes drin - nur Datenschrott.
Und ein Einlesen klappt dann logischerweise auch nicht mehr.
Kann mir jemand sagen wo mein Fehler liegt ? Warum wird der MemoryStream nicht sauber weggeschrieben ?
