Форум: "WinAPI";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];
ВнизПрограммно вызвать нажатие кнопки Найти похожие ветки
← →
Sadya (2003-11-02 14:52) [0]Мастера, вопрос такой:
есть чужая программа, я по ее заголовку могу получить дескриптор как окна, так и той кнопки, что мне нужна. Мне ее нужно нажать, т.е. вызвать функцию, которая происходит по нажатию
Текст моей попытки :
procedure TForm1.Button1Click(Sender: TObject);
var WindowHandle,But: HWND;
str:String;
P:Pchar;
begin
str:="TEST";
WindowHandle:=FindWindow (nil, PChar(str));
But:=GetWindow(WindowHandle,GW_CHILD);
Memo1.Lines.Clear;
But:=GetWindow(But,GW_HWNDNEXT);
GetWindowText(But,P,100);
Memo1.Lines.Add(String(P));
SendMessage(But,WM_SETFOCUS,0,0);
SendMessage(But,WM_CHAR,VK_RETURN,1);
end;
← →
default (2003-11-02 14:56) [1]пошли WM_LBUTTONDOWN и WM_LBUTTONUP
← →
Sadya (2003-11-02 16:06) [2]Хорошо, а пример кода: меня интересуют надо ли указывать координаты и если да, то как записать такие координаты : 186 26
← →
Sadya (2003-11-02 16:13) [3]Все ! Получилось ! Спасибо за совет
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c