[J-Fobos]

Быстрее всего будет так, но все же я считаю что лучше организовать таймер с небольшой задержкой

begin 
if FromClient and (pck[1]=#$23) and (ConnectName=name) then
begin
buf:=pck;
for i:=1 to 50 do
SendToServerEx(name);
end;
end.