... -> SocKet Init OK ! & Receive / Send OK ! Test 2############ /*----------------------------------------------------------------------*/ oSocket = TSocket():New( 2000 ) oSocket:bRead = { | oSocket | MsgInfo( oSocket:GetData() ) } // Never use a MsgInfo() here because it hangs Windows!!! ...