а сокеты везде одни и теже просто убираем класс меняем заголовки функций потом все переменные переносим в раздел описания переменных и готово =) у нас модуль работы с сокетами для паскалеподобных