Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Вниз

Нажать на кнопку дрогого приложения 


cad   (2002-03-04 08:47) [0]

Подскажите, пожалуйста, как нажать на орпеделенную кнопку (знаем ее caption) на определенной форме (знаем тоже ее caption) другого приложения?
ОбЪясните пожалуйста по подробнее: я полный ламер.
Спаибо.



GenBr   (2002-03-04 08:55) [1]

Никак. Чтобы приложение могло принимать команды из других приложений оно должно поддерживать COM-автоматизацию



MBo   (2002-03-04 09:21) [2]

в форуме WinApi поройся



Bobyr   (2002-03-04 10:32) [3]

Если эта кнопка одна, то можно вызвать ее функицию ч/з ShellExecute



Севостьянов Игорь   (2002-03-05 00:16) [4]

Нажмем например кнопку "Start"

var StartButton: HWND;
begin
StartButton := FindWindowEx(FindWindow("Shell_TrayWnd", nil),0,"Button", nil);
SendMessage(StartButton, BM_CLICK, 0, 0);
end;


проверял на D5+Win2000 - работает - вопросы по мылу



Koster   (2002-03-05 07:07) [5]

>Севостьянов Игорь: к сожалению не все кнопки реагируют на сообщение WM_CLICK. Чуть надежнее будет так:

bt := FindWindowEx(h, 0, "Button", "&Пропустить");
// где Button класс окна кнопки, &Пропустить ее Caption,
if bt <> 0 then begin
SendMessage(bt, WM_LBUTTONDOWN, 10 + 10 * 65536, MK_LBUTTON);
SendMessage(bt, WM_LBUTTONUP, 10 + 10 * 65536, 0);
end;

10 + 10 * 65536 - щелкаем в координатах (10,10) окна кнопки. Можно сюда вписать и другие координаты. h - handle окна формы, ищется как было показано выше через FindWindow




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.031 c
1-66896           Song                  2002-03-05 10:38  2002.03.21  
мне нужно послать Ctrl+A через WM_CHAR (или ещё как-то). Через SendMessage там есть последний параметр lKeyData.


6-66942           Nikolay               2002-01-05 21:50  2002.03.21  
TCP Client


3-66723           volodya_              2002-02-20 11:43  2002.03.21  
Помогите с кодировкой


1-66865           Vitaliy               2002-03-05 15:58  2002.03.21  
Создание нового XML документа


14-67000          azik                  2002-02-05 13:15  2002.03.21  
Люди помогите разобратся с сервисами в Delphi. Спасибо !!!