https://s3.picofile.com/file/7488843438/socket_in_delphi.doc.html