Memory Streams kopieren?

[negaH]

Delphi-Quellcode:

var
  Source,Dest: TMemoryStream;
begin
 ....
   Dest.Position := Dest.Size;
   Dest.WriteBuffer(Source.Memory^, Source.Size);
 ....
end;

// oder
var
  Source,Dest: TMemoryStream;
begin
 ....
   Source.Position := 0;
   Dest.Position := Dest.Size;
   Dest.CopyFrom(Source, Source.Size);
 ....
end;

Ersters ist schneller.


Hagen