pa gladajuci u code, ne znam samo zasto koristis 2 streama?
Zar nije mogao odmah "stream" da se prenosi?
Ako jeste, drugi stream ti ne treba.
Greska je u SizeOf(neki stream)..
SizeOf(Stream) jeste 4 byte
Stream.Size jeste prava velicina
Ne svidja mi se linija PStream.Korisnici.LoadFromStream... to je vrlo ne pouzdano.
ja bih napravio ovako:
Stream:=TMemoryStream.Create;
try
memKorisnici.Lines.SaveToStream(Stream);
Stream.Position:=0;
Athread.Connection.WriteBuffer(Stream,Stream.size,true);
finally
Stream.free;
end;
inace, kad iz jednog strima pravis drugi, korisiti:
RezultijuciStream.CopyFrom(UlazniStream, UlazniStream.size);
RezultijuciStream.Position := 0;
//ili jos bolje: RezultijuciStream.Seek(0,stFromBeginning)
|