有一个很早的程序,用的是TWinSocketStream和Tclientsocket
代码是:WinSocketStream := TWinSocketStream.Create(MainForm.ClientSocket.Socket, 60000);现在想把Tclientsocket换成 indy tcp client socket ,但是上面的这句该怎么改呢?
代码是:WinSocketStream := TWinSocketStream.Create(MainForm.ClientSocket.Socket, 60000);现在想把Tclientsocket换成 indy tcp client socket ,但是上面的这句该怎么改呢?
indy的创建连接过程根本就不是这样的
TWinSocketStream这个没办法改动,我只想用indy替换tclientsocket和tserversocket就行
indy直接可以用sendstream发送和用readstream接收数据流的
为什么非要用twinsocketstream呢
indy是一套完全不同的组件
var s:string;Fullscreen:Tbitmap;
FullscreenCanvas:TCanvas;
dc:HDC;
tt:TmemoryStream;
MyJPEG,tempjpeg:tjpegimage;begin
s:=athread.Connection.ReadLn();
if s='getdesktop' then
begin
Fullscreen := TBitmap.Create;
Fullscreen.Width := screen.width;
Fullscreen.Height := screen.Height;
DC := GetDC (0);
FullscreenCanvas := TCanvas.Create;
FullscreenCanvas.Handle := DC;athread.Connection.WriteStream(tt);
fullscreen.free;athread.Connection.Disconnect;
end;end;
而且这个程序也确实运行不稳定