Source position: socketsh.inc line 183
procedure Sock2File(
Sock: LongInt;
var SockIn: file;
var SockOut: file
);