idIRC Ping

[ZBEP]

Здравствуйте!
Есть клиент для сервера.
Необходимо пинговать сервер, что бы не отключили, как минимум раз в минуту.
Так же нельзя отсылать много сообщений подряд, поэтому нужно сделать так, что бы клиент отсылал "PING" через 60 секунд после последнего отосланного сообщения.

В данный момент отправляю сообщения серверу не

IdIRC1.raw('TEXT');

А через функцию

function Raw1(irc:TIdIRC;t:string):Boolean;
begin
  IdIRC1.raw(t);
  TimerPing.Enabled:=False;
  TimerPing.Enabled:=True;
end;
...
Raw1(IdIRC1,'TEXT');

Получается, что таймер сбрасывается при каждой отправке сообщения и если он не успевает сбросится, то клиент пингует.

Мне кажется что это не совсем правильно, подскажите, возможно есть более правильное решение?
Есть хотя бы событие у idIRC, которое обрабатывает не прием сообщения, а отправку?

[kangreon]

Сообщение PING отправляется сервером для проверки активности клиента. Клиент отвечает на это сообщение PONG. Сообщение PONG должно отправляться как можно скорее после принятия сообщения PING.
Это согласно спецификации протокола IRC.

Компонент IdIRC сам отвечает на PING.

[ZBEP]

kangreon, в том то и дело, что данный сервер не отправляет ничего и клиентам приходится самим заботится об этом