hallo habe probleme mit der komprimierung eines streams, programm spukt nach ausführung einen fehler von wegen ungültige stream operation!? was mache ich falsch?
Code:
function komprimiere(input:TStream):tmemorystream;
var
xx: TCompressionStream;
begin
result:=tmemorystream.create;
xx := TCompressionStream.Create(clmax, input);
result.CopyFrom(xx, xx.Size);
result.position:=0;
end;