TCP/IP Socket unit for Sibyl: ScktComp.pas. Fixed hang-up in disconnect subroutine when peer connection no more available.