Thank you, Thausand and Thaddy
To summarize
- fpsock unit is specific for unix, linux
- ssockets unit contains the cross-platform TCP client TInetSocket
- both of them are part of fcl-net package
The code seems not written for fcl-net's fpsock.TTcpClient, because several methods and properties in the above code do not exist in TTcpClient from fpsock.
Looks more like Delphi's old TTcpClient? (Which has been deprecated since D7)
I reduced the example code, not to confuse someone reading this in the future.