TBinarySocksClient

News

 V 0.06 released! Corrected a bug - if Timeout=0 all connections timed out! Now when timeout=0 there is no timeout.

 V 0.05 released! OnTimeout event will now be called if an SOCKS connect attempt timesout. UseSocks can now be set at any time the socket is not connected. Previously if UseSocks were set before SocksAddress and SocksPort were set, a "No address specified" exception was raised.

 V 0.04 released! A bug was fixed where an attempted connection could hang.

 V 0.03 is now out! I've corrected some bugs/problems. Should I stop calling BETA now? No one has emailed me with problem reports!

 TBinarySocksClient is now a VISUAL component!

 Using some newly found free time I've converted TBinarySocksClient into a VC. Download v 0.02 beta to try it out!

 I've corrected an error on this page. SocksHost is really SocksAddress. I changed it in the control but forgot about it here. This way it's more like TBinaryClient.
 
 

Intro

Download tbsocks.zip - beta v 0.05

Features

• Derived from DWinsock's TBinaryClient control
• Can connect with or without a SOCKS server
• Almost a drop in replacement to add SOCKS support

Limitations

• Currently in BETA
• Only works with sockets that are decendents of TBufferedSocket
• Limited testing has been done by me
• Only SOCKS v4. I don't have access to any other SOCKS servers
• Only tested with Delphi 2. It should work with everything dWinsock work with though (Delphi 1, 2, 3, C++ Builder, etc.) Can someone try it and tell me?

New Properties

• UseSocks


 If true, Open will try to connect through SocksAddress at SocksPort

 If false, a direct connection to Host will be made. TBinarySocksClient should behave exactly like TBinaryClient in this mode. (hopefully)
 
 

• SocksAddress


 Hostname of SOCKS server
 
 

• SocksPort


 Port to connect to on SocksAddress
 
 

• Note on Conn property


 The Conn property is unchanged. It is still the actual socket that is used. This means that for SOCKS connections, conn.RemotePort and conn.RemoteAddress will return SocksPort and SocksAddress
 
 

How to use

Since TBinarySocksClient is now visual, do the following to add it to your component pallette in Delphi 2.0:
 
 
1. Choose

Install...

under the

Component

menu.
2. Press

Add...

button.
3. Enter file and pathname to

socks.pas

or

Browse

for it.
4. Press

OK

. Delphi should now rebuild the Component Library. TBinarySocksClient control should appear under your dWinsock tab.
Now add TBinarySocksClient controls to your projects like any other control!
 
 

Bugs

Don't know of any that haven't been fixed yet...:)

 Please test it out and send me reports of success/failure!

Contact Info

Send bug reports, requests for help, etc. to pfong@geocities.com

---

Back to my home