Hi
Any one have any idea how to tranfer the image from one server to another
server usinng client socket. well i have doen the following things
frist i have makde sure it get connects to the server. It gave me message
saying connected too
then i used the following code
ClientDataStructure.ClientStrmData := TMemoryStream.Create;
FillChar(ServerDataStructure.ServerFileSource,SizeOf(ServerDataStructure.ServerFileSource),0);
-----
----
StrPCopy(ServerDataStructure.ServerFileName,SourceFileName)
------
-----
ClientDataStructure.ClientStrmData.Seek(0,soFromBeginning);
ClientDataStructure.ClientStrmData.Write(ServerDataStructure.ServerFileName,SizeOf(ServerDataStructure.ServerFileName));
-----
-----
this is the source code i have also added the sam destination code in it
where i have mentioend blank spaces
in the end it says
ClientDataStructure.ClientStrmData.CopyFrom(ClientDataStructure.ClientFileStream,0);
ClientDataStructure.ClientStrmData.Seek(0,soFromBeginning);
ClientSocket.Socket.SendStream(ClientDataStructure.ClientStrmData);
it says succes in the end
but i dint able to see any file in destination thing
any diea where i am missing or u suggest any better apporach.
Regards
Vikas
--
vikas
_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: [email protected]
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to [EMAIL PROTECTED] with Subject: unsubscribe
