Create xsocket.pas