Um in anderen proceduren mit dem Stream arbeiten zu können muss ich ihn kopieren.
Delphi-Quellcode:
var
aStream: TStream;
procedure TMainForm1.VSTLoadNode(Sender: TBaseVirtualTree;
Node: PVirtualNode; Stream: TStream);
begin
...
aStream := TStream.Create;
aStream.CopyFrom(Stream,Stream.Size);
end;
Doch wenn er bei CopyFrom ankommt bringt er eine Debugger-
Exception von EReadError "Stream-Lesefehler".
Wie könnte ich den Stream sonst noch kopieren?