хочется посоветоваться: нужно удалить старый файл, создать новый (батник его архивирует) и когда архиватор закончит свою работу - отправить его на сокет определенный. Ничего умнее чем приведенное ниже в голову не пришло.

deletefile('\\smit\zakazserver\class.rar');
WinExec ('\\smit\zakazserver\pack.bat', SW_HIDE);
while (not fileexists('\\smit\zakazserver\class.rar')) do;

может есть что умнее?