[Помогите!] Проблема с игрой на базе ElementClient [Delphi 7]

[Хакерок:)]

Пишу программу на Delphi 7 для Jade Dynasty, но не срабатывает нажатие виртуальной клавиши в самом клиенте. Код ниже. Надеюсь на вашу помощь.

procedure TForm1.sGauge2Change(Sender: TObject);
var KlientWindow:HWND;
begin
KlientWindow := FindWindow(nil, PChar('Jade Dynasty'));
if sGauge2.Progress < 90 then
  begin
    SendMessage(KlientWindow, WM_KEYDOWN, VK_F7, 0);
    SendMessage(KlientWindow, WM_KEYUP, VK_F7, 0);
  end;
end;

P.S. Если в коде нет ошибок, то подскажите альтернативный вариант нажатия клавиши в другом окне.