The question : How can I know the client connect to server (if I am server)?
I try as below code but :bConnect is not response when client connect.
- Code: Select all Expand view
- oSocket:bAccept = { | oSocket | ;
oClient := TSocket():Accept( oSocket:nSocket ),;
oClient:Cargo := ST_COMMAND,;
oClient:bRead := { | oSocket | OnRead( oSocket ) },;
oClient:bClose := { | oSocket | OnClose( oSocket ) }, ;
oClient:bConnect := { | oSocket | OnConnect( oSocket ) } }