Listen Example for Delphi
//create a server to accept up to 25 clients LEADDICOMNet1.Listen ('', 104, 25);