Доброго времени суток всем. Мне требуется передать приложению, хэндл которого я знаю, комбинацию клавишь, типа "CTRL+UP". Как передать отдельное нажатие на форуме есть. Правда, есть листинг программы, где, вроде, реализуется передача комбинаций, но, в следствии своей универсальности, я ее не понял =) Там много всего ненужного мне... Поделитесь своими знаниями...

У меня тут компонент был. Кажется он такое умеет делать. Посмотри.

Присоединённый файл ( Кол-во скачиваний: 14 )
 SendKeysRoutine.pas 13,98 Kb

Дело в том, что это и есть тот "универсальный код", про который я писал выше... Если не сложно - напиши конкретный пример, тогда будет понятнее. Допустим надо послать, тот же самый CTRL+UP в приложение iTunes...

mrEvel, а ты устанавливал компонент? Там же все должно быть просто.

Виноват... всё оказалось легче, чем я думал, но опять же работают только одиночные клавиши. Почему-то когда я делаю так:

AppActivate(Pchar('iTunes'));
SendKeys('^({UP})',false);

то срабатывает только UP. Пытался и без круглых скобок - без разницы. В файле, который ты скинул, почему-то была не закончена строка "while(I ...". Наскоьлко я понимаю, там должно быть While(I<L)

Поищи в нэте хелпу по этому компоненту. Должна быть справка, как послать сочитание клавиш программе.

P.O.D., спасибо огромное... разобрался. Правда я использую не sendinput. Смотрел описание к этой команде и наткнулся на keybd_event. С помощью этой команды легко имитируется CTRL+UP. Вот рабочий код:

AppActivate(Pchar('iTunes'));
keybd_event(VK_CONTROL,55,KEYEVENTF_EXTENDEDKEY or 0, 0);
keybd_event(VK_UP,55,KEYEVENTF_EXTENDEDKEY or 0, 0);

keybd_event(VK_UP,55,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0);
keybd_event(VK_CONTROL,55,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0);

AppActivate - пользовательская функция, которая переключает фокус на нужное приложение (надеюсь правильно написал =) )