Форум программистов
 
О проблемах с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Ответ
 
Опции темы
Старый 19.05.2011, 08:36   #1
sashaxD
Пользователь
 
Регистрация: 19.05.2011
Сообщений: 48
Радость Нажатие клавиши F11

Нужен исходник программы которая нажимает и отпускает клавишу F11 желательно в любом окне. Я новичок, не ругайте.
За ранее спасибо.
sashaxD вне форума Ответить с цитированием
Старый 19.05.2011, 13:14   #2
Swarog
Форумчанин
 
Аватар для Swarog
 
Регистрация: 26.01.2010
Сообщений: 215
По умолчанию

работает ил нет на знаю просто нашел пример

К сожалению работает хорошо, только когда фокус у вызывающего окна, в противном случае может глючить


Код:
procedure TForm1.SetKey(Key:Integer);
begin
  keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0);
  keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY,0);
  keybd_event(Key,0,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP,0);
end;



Применение



Код:
SetKey(VK_SCROLL);
SetKey(VK_CAPITAL);
Могу лишь пнуть в нужном направлении (ну или как получится)
Swarog вне форума Ответить с цитированием
Старый 19.05.2011, 14:19   #3
sashaxD
Пользователь
 
Регистрация: 19.05.2011
Сообщений: 48
По умолчанию asdsa

В гугле я все попробовал вроде.
Ошибку показывает в строчке procedure TForm1.SetKey(Key:Integer);
Когда запускаю билд.
sashaxD вне форума Ответить с цитированием
Старый 20.05.2011, 12:06   #4
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,455
По умолчанию

АП & ДАУН.

Текст ошибки в студию.
Человек_Борща вне форума Ответить с цитированием
Старый 20.05.2011, 12:51   #5
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,742
По умолчанию

Цитата:
Когда запускаю билд.
это еще какой билд?
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 20.05.2011, 13:27   #6
fate
Форумчанин
 
Аватар для fate
 
Регистрация: 17.03.2009
Сообщений: 318
По умолчанию

sashaxD используй winapi функцию SendInput
fate вне форума Ответить с цитированием
Старый 21.05.2011, 11:27   #7
sashaxD
Пользователь
 
Регистрация: 19.05.2011
Сообщений: 48
По умолчанию

Цитата:
Сообщение от fate Посмотреть сообщение
sashaxD используй winapi функцию SendInput
Это вроде для С++ , а мне надо на делфи.

Цитата:
Сообщение от Человек_Борща Посмотреть сообщение
.

Текст ошибки в студию.
Undeclared indentifier SetKey
Undeclared indentifier Key

Последний раз редактировалось Stilet; 21.05.2011 в 16:29.
sashaxD вне форума Ответить с цитированием
Старый 21.05.2011, 16:31   #8
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,840
По умолчанию

Цитата:
а мне надо на делфи.
А ее и в Делфи можно использовать:
http://www.programmersforum.ru/showt...t=18011&page=2
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.05.2011, 10:50   #9
sashaxD
Пользователь
 
Регистрация: 19.05.2011
Сообщений: 48
По умолчанию фывфы

Цитата:
Сообщение от Stilet Посмотреть сообщение
А ее и в Делфи можно использовать:
http://www.programmersforum.ru/showt...t=18011&page=2
Не работает ((( Можете просто дать исходник такой программы?
sashaxD вне форума Ответить с цитированием
Ответ
Купить рекламу на форуме 20000 рублей в месяц
Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Реакция на нажатие клавиши. Vaigard Общие вопросы Delphi 4 30.12.2010 18:39
Нажатие клавиши... Basketman Общие вопросы Delphi 1 11.02.2010 09:35
Долгое нажатие клавиши в KeyDown как одно нажатие marina15056 Общие вопросы Delphi 7 15.08.2009 23:22
Как заблокировать горячие клавиши Alt+F11 kovalevskivf Microsoft Office Excel 2 20.05.2009 10:26
Нажатие клавиши format Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 1 05.05.2008 14:25


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS