delphi 3.0에서 Clientsocket에서 이미지를 ServerSocket으로
전송하려하는데 잘 되지않는군요
cliect에서
bmp := TBitmap.Create;
mem := TMemoryStream.Create;
bmp.LoadFromFile('test.bmp');
bmp.SaveToStream(mem);
ClientSocket1.Socket.SendStream(mem) 로 하고
Server에서
procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
bmp := TBitmap.Create;
mem := TMemoryStream.Create;
bmp.LoadFromStream(socket.data);
bmp.SaveToFile('c:ahnrarara.bmp');
end;
로했는데....
어느부분이 잘못되었죠....