nach Deinem
Delphi-Quellcode:
//Speichern zum Angucken
ms.savetofile('c:\temp\stream.xxx'); //Stream Position ist jetzt am Ende des Files
// Was soll er hier einlesen?
ms.Read(len, sizeof(len));
Read liefert Dir doch die Anzahl der gelesenen Bytes.
also sowas wie :
Delphi-Quellcode:
if ms.Read(len, sizeof(len)) = sizeof(len) then
begin
end
else
Error....