在delphi下TClientSocket的使用技巧 转
http://blog.****.net/newzhhsh/article/details/2905874
如果你是在线程的构造函数中创建TClientSocket,那么TClientSocket还是属于主线程,不属于 这个线程。如果你是在线程的Execute()中创建TClientSocket,那么TClientSocket属于这个线程,但是此时你无法使用OnRead来读取,必须将TClientSocket的ClientType设为ctBlocking