How to make Ping, TCP/IP with Pascal

If someone could send me info, or source code on how to program
TCP/IP with Pascal 7.0 it would help me out a big deal.
                                        Thanks