Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.07;
Скачать: [xml.tar.bz2];

Вниз

имитация нажатия клавишь(мышки)   Найти похожие ветки 

 
Tehnik ©   (2007-09-02 16:07) [0]

Добрый день господа програмёры..возникла такая проблема:  как имитировать нажатие клавиш и кнопок мышки..
и как сделать так чтобы мона было указывать скока времени она будет нажата ???


 
@!!ex ©   (2007-09-02 16:58) [1]

WM_LBUTTONDOWM
WM_LBUTTONUP
А сколько времени она нажата - это время между первым и вторым сообщениями.


 
^_____^   (2007-09-02 17:02) [2]

спасибо, а где там указывать какую именно клавишу нажимать?
P.S [Error] Unit1.pas(37): Undeclared identifier: "WM_LBUTTONDOWM" (какую либу подключать? =) )


 
Tehnik(^____^)   (2007-09-02 17:05) [3]

а всё , туплю =)
всё норм)))
пасиб большое


 
Tehnik(^____^)   (2007-09-02 17:06) [4]

Тока вот немного непонимаю...как например нажать кнопку F9 (для общего примера!)


 
@!!ex ©   (2007-09-02 17:11) [5]

> [4] Tehnik(^____^)   (02.09.07 17:06)

SendMessage(Handle,WM_KEYDOWN,VK_F9,0);
Help принчипиально не читаем?


 
sniknik ©   (2007-09-02 17:12) [6]

> нажать кнопку F9 (для общего примера!)
для начала ее надо на мыше найти...


 
Tehnik(^____^)   (2007-09-02 17:19) [7]


> нажать кнопку F9 (для общего примера!)
для начала ее надо на мыше найти...

Эм..... если сам не знаешь мог бы и помолчать....

я ужо описывал чего мне именно надо бы:

...как имитировать нажатие клавиш....


 
Tehnik(^____^)   (2007-09-02 17:20) [8]


SendMessage(Handle,WM_KEYDOWN,VK_F9,0);
Help принчипиально не читаем?

Спасибо... щаз очень времени нету... и тем более знание англ яза у мну фиговое ((


 
@!!ex ©   (2007-09-02 17:53) [9]

> я ужо описывал чего мне именно надо бы:
>
> ...как имитировать нажатие клавиш....

Зря. в[6] на тебя правильно наехали, я и то не сразу понял, как ты собираешься на мыше нажимать F9.
Ибо вопросынажо тоже правильно задавать. И скобками правильно пользоваться. Поскольку запись вида клавишь(мышки)...
Прочитай ее вслух и все поймешь.


 
Tehnik(^____^)   (2007-09-02 18:09) [10]


> Зря. в[6] на тебя правильно наехали, я и то не сразу понял,
>  как ты собираешься на мыше нажимать F9.
> Ибо вопросынажо тоже правильно задавать. И скобками правильно
> пользоваться. Поскольку запись вида клавишь(мышки)...
> Прочитай ее вслух и все поймешь.
>



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


 
Tehnik(^____^)   (2007-09-02 18:11) [11]

ладно тада вопрос по другому поставлю:
кто может выложить исходник проги которая жмёт ,допустим ,F9 и сразу же клацает мышкой через каждые N секунд?))


 
SergeR ©   (2007-09-02 18:13) [12]


> Tehnik(^____^)   (02.09.07 18:09) [10]

Ну дык тебе вежливо и объяснили...а не послали кой-куда )))


 
@!!ex ©   (2007-09-02 18:44) [13]


> Конференция для начинающих, а также для тех, кому сложно
> объяснить чего он хочет. Просьба к участникам быть взаимовежливыми,
> профессионалам отдельная просьба - быть снисходительными.

Чем мы тут и занимаемся.
Только это дает нам права рассказать тебе, как правильно задавать вопросы всеже.
Ибо телепатор не у всех правильно работает.

> кто может выложить исходник проги которая жмёт ,допустим
> ,F9 и сразу же клацает мышкой через каждые N секунд?))

Извини, у тебя нет времени читать хелп, у меня нет времени писать тебе код, ИМХО информации у тебя более чем достаточно.


 
sniknik ©   (2007-09-02 18:50) [14]

> кто может выложить исходник проги которая ...
я например могу. и еще добрая половина форума тоже... наверное. тебе как поименный список нужен? ну чтож открывай опрос, один "могущий" найден, записывай, дело за остальными.

кстати слово "могу" это не синоним "сделаю"/"должен"/и т.д. и еще кстати, ТЗ имеет принципиальную неточность, очень влияющую на методы исполнения. не указана область воздействия - конкретное окно или распространяется на систему в целом.


 
Virgo_Style ©   (2007-09-02 18:57) [15]

sniknik ©   (02.09.07 18:50) [14]
я например могу. и еще добрая половина форума тоже


Серьезно?? А я такие штуки только эмулировать умею...((


 
sniknik ©   (2007-09-02 19:07) [16]

> Серьезно?? А я такие штуки только эмулировать умею...((
не расстраивайся, еще немного и ты тоже дорастешь до осознания дзена и дао программирования...
ведь элементарно же! попросту пишешь программу выдвигающую лоток CD, и просишь юзера разместить клаву аккурат кнопкой F9 перед уголком выдвинутого лотка, под другой уголок придется подложить кнопку мыши... вуаля!


 
Tehnik(^____^)   (2007-09-02 22:01) [17]

ну вот не можите так бы и сказали...
-----------------------------------------------------------

> Ибо телепатор не у всех правильно работает.

Настройте тада))) могу по теепатору хелп выложить)))
------------------------------------------------------------
P.S: у мну до сих пор ничё не получилось(((
скинте плз пример, заранее благодарен)))


 
@!!ex ©   (2007-09-03 06:53) [18]

> Настройте тада))) могу по теепатору хелп выложить)))

Выкладывай. П лучше вопросы правильно задавай. ;)


> P.S: у мну до сих пор ничё не получилось(((
> скинте плз пример, заранее благодарен)))

Ты скниь свой код, я или кто нить еще скажем что не правильно, а писать для тебя примеры, врядли кто будет.


 
oldman ©   (2007-09-03 09:14) [19]


> возникла такая проблема:  как имитировать нажатие клавиш
> и кнопок мышки


У мыши есть клавиши и кнопки одновременно???


 
Nikfel ©   (2007-09-03 09:28) [20]

Можно воспользоваться mouse_event и SetCursorPos.
Я сам написал этот код, но полностью не разобрался. Нажимается только левая кнопка мыши. Надо бы поискать описание к mouse_event.
mouse_event(WM_LBUTTONDOWN,0,0,0,0);
mouse_event(WM_LBUTTONUP,0,0,0,0);
mouse_event(WM_rBUTTONDOWN,0,0,0,0);
mouse_event(WM_rBUTTONUP,0,0,0,0);
Для нажатия кнопки на клавиатуре:
procedure SimulateKeystroke(Key : byte; extra : DWORD);
begin
       keybd_event(Key,extra,0,0);
       keybd_event(Key,extra,KEYEVENTF_KEYUP,0);
end;


 
Denis_ ©   (2007-09-03 11:08) [21]


> ... и тем более знание англ яза у мну фиговое ((

И русского тоже?
Если опрос ещё открыт, то я тоже могу написать такой пример :)


 
Tehnik(^____^)   (2007-09-03 20:07) [22]

"Nikfel" :спс =)
"Denis_": ну дафай выкладывай еси чёто интересное )))
а на счот знания русского языка я не виноват что на первом и втором курсе( да и дальше тоже ) его не преподают))))
Вот теперь и утверждай что Креветка пишется через "т" а не "д" ^_^


 
Tehnik(^____^)   (2007-09-03 21:50) [23]

хотел позыреть  номерки F"ок ....


procedure TForm1.Button1KeyPress(Sender: TObject; var Key: Char);
begin
showmessage(inttostr(ord(Key)));
end;

К сожалении не реагирует када жму Ф кнопки ....((


 
Tehnik(^____^)   (2007-09-03 21:55) [24]

Вощем procedure SimulateKeystroke(Key : byte; extra : DWORD);
begin
      keybd_event(Key,extra,0,0);
      keybd_event(Key,extra,KEYEVENTF_KEYUP,0);
end;
Это рульно
мне главное Фки чтобы клацались


 
{RASkov} ©   (2007-09-03 21:56) [25]

> [23] Tehnik(^____^)   (03.09.07 21:50)
> хотел позыреть  номерки F"ок

Не правильно "зыришь", "позырь" в модуле Windows.pas..... они там все есть уже...
ЗЫ и почитай какие "кнопки" попадают в OnKeyPress и какие в OnKeyDown(Up)....


 
Tehnik(^____^)   (2007-09-03 21:58) [26]

ну а можно тогда строчку для нажатия Фки? срочно надо)


 
@!!ex ©   (2007-09-03 22:07) [27]

> [26] Tehnik(^____^)   (03.09.07 21:58)

Я вижу вы не только Хулп не читаете, но даже что здесь пишут тоже...
VK_F1 ... VK_F24
Это, кстати, в хелпе есть.


 
Dib@zol ©   (2007-09-03 22:10) [28]

Завалить юзера хелпами истерическим боем по ф1 в случае если он в очередной раз ступИт? %)


 
Tehnik(^____^)   (2007-09-03 22:13) [29]

Всё!
Всем БОЛЬШОЕ спасибо за терпение порыров моего ламерства)
тему можно закрывать ^_^


 
Tehnik(^____^)   (2007-09-03 22:15) [30]

P.S.
прогу делал для РагнароК онлайн..
там во время войны гильдий визардам надо юбзать массовае скилы постонно...
и чтобы не мучацо 2 часа включить прогу и идти пить чай )


 
evvcom ©   (2007-09-04 12:09) [31]

Точно проблемы с русским... Ниче не понял... Старею :)


 
Tehnik(^____^)   (2007-09-04 14:43) [32]

а народ появилась проблемка)))
када ставлю имитацию клацания мышкью всё норм....
но в Рагнароке такое ощущение что работает тока мауз баттн down
....
выложите плз как можно больше примеров клацания мышкой)


 
Tehnik(^____^)   (2007-09-05 19:04) [33]

и ещё как можно програмнно переместить курсос мыши??? =)
mousemove, mouse_event не помогает.....
в этот раз ХЕЛП читал))) сёранво эффекта 0


 
Denis_ ©   (2007-09-05 19:10) [34]

0 - тоже результата (С) народная мудрость


 
Tehnik(^____^)   (2007-09-05 19:19) [35]

%)


 
Denis_ ©   (2007-09-05 19:37) [36]

оно не понимает, по какому окну ту щёлкаешь/передвигаешь мыша


 
Tehnik(^____^)   (2007-09-05 19:51) [37]

ну обьясни плз как дать понять делфи что мну нуно?)


 
DimOK ©   (2007-09-07 11:32) [38]


> mousemove, mouse_event не помогает.....

SetCursorPos(
   int X, // horizontal position  
   int Y  // vertical position
  );
+ Help-> Windows SDK


 
Ega23 ©   (2007-09-07 11:40) [39]

Спасибо большое Tehnik(^____^) за отличное настроение в середине пятницы.
Давно так не ржал.

З.Ы. LMD


 
Denis_ ©   (2007-09-07 19:48) [40]


> Спасибо большое Tehnik(^____^) за отличное настроение в
> середине пятницы.
> Давно так не ржал.

В смысле? можно я тоже поржу?



Страницы: 1 2 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.10.07;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.54 MB
Время: 0.071 c
2-1189432796
новичёк
2007-09-10 17:59
2007.10.07
распаковать GZIP


15-1189438911
oldman
2007-09-10 19:41
2007.10.07
А у нас вчера был день города...


2-1189582237
Wood
2007-09-12 11:30
2007.10.07
TColorDialog.


15-1189187056
rueus
2007-09-07 21:44
2007.10.07
Помогите найти описание структур


1-1185344333
NKT
2007-07-25 10:18
2007.10.07
Многодокументальное прило жение . Создание новой нестан. формы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский