IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> Запуск программы из-под Делфи
klem4
сообщение 12.08.2005 9:14
Сообщение #1


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Подскажите в каком направлении мне копать в DRKB, не могу найти, нужно написать программу, которая будет запускать win32 приложение и на ЕГО форме нужно нажать кнопку.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 12.08.2005 12:53
Сообщение #2


Гость






klem4, а вот так не проще:
Var
TheWindowHandle, hw:HWND;
...
{ Здесь запускаешь программу... }

TheWindowHandle := FindWindow(nil, 'заголовок твоей программы');
If TheWindowHandle <> 0 Then Begin { если окно найдено }
{ ищешь кнопку }
hw := FindWindowEx(TheWindowHandle,0,nil, Pchar('название кнопки'));
SendMessage(hw, BM_CLICK, 0, 0); { и нажимаешь ее }
End
?
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 14.07.2025 14:18
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"