hellshadow

procedure TfrmPrincipal.hotkey(hot: integer); begin ApplyHandle:=FindWindow(nil,'Tibia');//Pega o handle da janela que tem o titulo Tibia case hot of 1 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F1,1); 2 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F2,1); 3 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F3,1); 4 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F4,1); 5 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F5,1); 6 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F6,1); 7 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F7,1); 8 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F8,1); 9 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F9,1); 10 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F10,1); 11 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F11,1); 12 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_F12,1); 13 : SendMessage(ApplyHandle,WM_KEYDOWN,VK_RETURN,1);//Uso tambem o enter para Relogar no server save, se for configurado o tempo correto ele reloga o char e continua runando end;