Залипание "ESC"

[Illusiony]

Делаю отправку нажатых ЛКМ, ПКМ, "ESC" на сервер.

Так:

 W:=GetAsyncKeyState(VK_LBUTTON);
  if W = $8001 then begin
     S :='кнопка нажата';
     ......
     if W = $0000 then begin  // если кнопка отпущена
      S := 'кнопка отпущена';
        if  naj=True then begin
       //num:=0;
        end;
      otj:=True;  // переменную отжата в true
       naj:=False;// переменную нажата в false
      end;

Использую переменные для переключения состояния нажата - отжата и счетчик кол нажатий по этой логике. С ЛКМ и ПКМ все нормально, но делая тоже самое с ESC:
W_R:=GetAsyncKeyState(vk_escape);
При нажатии и удержании ESC посылается сразу целая очередь команд вместо 1ой. При нажатии и не отжатии ЛКМ и ПКМ такого не происходит.

В чем может быть проблема? Коды для ЛКМ, ПКМ и ESC аналогичные.

[Illusiony]

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