Salut Steve Batson !
Dans un message de Steve Batson dat‚ du 18 Aug 96  17:40:14 il ‚tait dit:
  FP>> I wrote my own one. I can post it here if you are really interested.
  FP>> btw this component is 100% compatible between Delphi 1 and Delphi 2:
  FP>> Ialso wrote a winsock.pas for Delphi 1 wich is compatible with the
  FP>> one found in the Delphi 2 box.
  FP>> Two months ago, I posted the source code for the Delphi 1 winsock
  FP>> component i wrote. Since then I updated my source code to be 100%
  FP>> percent compatible with Delphi 2.
  SB> Butting in here too ...I would be very interested in getting 
  SB> all your winsock stuff to post on my BBS
I will not upload to your BBS and I have no access to Internet. But 
I'll post the full source code here. I have split the source in chunks 
of about 200-300 lines in each messages. There is:
WSOCKET.PAS    VCL component for the socket abstraction (winsock.dll)
               Compatible with both Delphi 1 and Delphi 2.
WINSOCK.PAS    Delphi 1 stuff, for Delphi 2, use the borland winsock.
               pas found in delphi 2.0\source\rtl\win.
TNSRV1.PAS     Source code for sample Telnet server application, main form
TNSRV2.PAS     Source code for sample telnet server, client form
TNSRV1.DFM     Form definition in text mode
TNSRV2.DFM     Form definition in text mode
TNSRV.DPR      Projet for sample application
To compile and link the sample application, you need to install the 
WSOCKET.PAS VCL in you component library.
To test the sample application, you need of course the TCP/IP stack 
installed on your computer. You can then use the a TELNET application 
from another computer or the same computer if you connect to 
'localhost' (127.0.0.1).
In the following 11 messages, all the sources.
Amiti‚s,
{-Francois Piette-}
--- SvFido 1.32
---------------