procedure TForm1.Button1Click(Sender: TObject);
begin
Sleep(3000);// 3 сек чтоб открыть игру или др. прогу и смотреть результат
keybd_event(Ord('T'), 0, 0, 0); // нажали Т
keybd_event(Ord('T'), 0, KEYEVENTF_KEYUP, 0); // отпустили Т
keybd_event(VK_RETURN, 0, 0, 0); // нажали Enter
keybd_event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0); // отпустили Enter
end;