| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нажатие кнопки
cok © (2002-03-09 21:54:00)Извините, если такой вопрос уже был (что скорее всего), но не могли бы вы сказать, как эмулировать нажатие Button-а в чужой проге?
cok (2002-03-25 21:02:00) [1]2 Raptor
Спасибо! Все работает
Raptor (2002-03-24 10:53:00) [2]
Var
ButClassName,ButCaption:String;
MainWnd,ButWnd:HWND;
Begin
ButClassName:="имя_класса_кнопки";
ButCaption:="надпись_на_кнопке";
MainWnd:=<хендл_окна_на_котором_находится_кнопка>;
ButWnd:=FindWindowEx(MainWnd, 0, PChar(ButClassName), PChar(ButCaption));
PostMessage(ButWnd, BM_CLICK, 0, 0);
End;
cok (2002-03-23 13:30:00) [3]2 SongЧто это такое? (ее описание я нигде не нашел, даже в MS SDK Help)
2 chernoruk
Твой пример не работает. Я еще вставлял
hand:=FindWindow(nil,"текст окна");
но все равно не фурычит.
chernoruk (2002-03-10 04:35:00) [4]
var
s1, s2 :string;
hand, butt :HWND;
begin
s1:="Button_Name"; //button caption
s2:="button"; //button class
butt:=FindWindowEx(Hand, 0, PChar(s2), PChar(s1));
//hand-handle to a parent window
PostMessage(butt, wm_LButtonDown, 0, 0);
PostMessage(butt, wm_LButtonUp, 0, 0);
end;
Song (2002-03-09 23:07:00) [5]CB_CLICK ?
| |
