![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Управление сторонним приложением [D7, XP]
Sesh © (2006-04-07 14:23:00)Нашел кнопку на стороннем приложении, а как на нее нажать?
PostMessage, SendMessage и что в параметрах указывать?
Sesh (2006-04-07 15:57:00) [1]И последнее, там на форме 2 эдита, если делаю так то меняет только текст в 1-ом, а надо и во 2-м, как перейти к нему?
s:=FindWindow(nil,'Доступ');
f:=FindWindowEx(s,0,'#32770',nil);
d:=FindWindowEx(f,0,'Edit',nil);
z:='111';
SendMessage(d,WM_SETTEXT,100,LongInt(@z));
sleep(500);
d:=FindWindowEx(f,0,'Edit',nil);
z:='222';
SendMessage(d,WM_SETTEXT,100,LongInt(@z));
пробовал обойти таким путем не получилось, подскажите пож-ста
d:=FindWindowEx(f,0,nil,'');
z:='222';
SendMessage(d,WM_SETTEXT,100,LongInt(@z));
balepa (2006-04-07 15:07:00) [2]var
S:PChar;
mHWND: HWND;
begin
S:='Server'#0;
SendMessage(mhwnd,WM_SETTEXT,0,LongInt(s));
end;
Sesh (2006-04-07 15:01:00) [3]сделал так:
PostMessage(f,WM_LBUTTONDOWN,VK_RETURN,0);
PostMessage(f,WM_LBUTTONUP,VK_RETURN,0);
а вот как теперь в найденный EDIT вписать текст?
balepa (2006-04-07 14:46:00) [4]В справке почитай msdn.microsoft.com,
Указывать наверно кому куда и что :)