вызов функции другой проги...
 |
Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
|
| ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
| [3.15.143.207] |
|
|
ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi · Книги по Delphi
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как прочитать список файлов, поддиректорий в директории?
5. Как запустить программу/файл?
... (продолжение следует) ...
Вопросы, подробно описанные во встроенной справочной системе Delphi, не несут полезной тематической нагрузки, поэтому будут удаляться.
Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы. Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
Внимание
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...
Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как прочитать список файлов, поддиректорий в директории?
5. Как запустить программу/файл?
... (продолжение следует) ...
Вопросы, подробно описанные во встроенной справочной системе Delphi, не несут полезной тематической нагрузки, поэтому будут удаляться.
Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы. Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
Внимание
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...
вызов функции другой проги...
|
Сообщ.
#1
,
|
|
|
|
Драсте! А мона как-то вызвать функцию другой проги вообще?
Например мне нужно симитировать нажатие на клавишу "сancel" в посторонней проге? З.Ы. мона конечно переместить мышу и щелкнуть (программно), но енто не выход :-( Заранее псб... |
|
Сообщ.
#2
,
|
|
  |
Находишь хэндл и кликаешь.
|
|
Сообщ.
#3
,
|
|
|
|
Что, больше никто не знает? :-[
|
|
Сообщ.
#4
,
|
|
|
|
Цитата VUD, 08.03.03, 20:12:57 Что, больше никто не знает? :-[ А что этого недостаточно? |
|
Сообщ.
#5
,
|
|
|
|
Короче вот набросал...погляди, рпзберись...
  <br>var hCalc:THandle;<br> hButt:THandle;<br> buf:array[0..100] of char;<br>begin<br> hCalc:=FindWindow(nil, 'Калькулятор');<br> if IsWindow(hCalc) then<br> begin<br> hButt:=GetWindow(hCalc, GW_CHILD + GW_HWNDFIRST);<br> while IsWindow(hButt) do<br> begin<br> GetClassName(hButt, buf, sizeof(buf));<br> if buf='Button' then<br> begin<br> SendMessage(hButt, BM_CLICK, 0, 0);//<- это основная ф-ия<br> //кстати это не единственный способ кликнуть<br> ZeroMemory(@buf, sizeof(buf));<br> end;<br> hButt:=GetWindow(hButt, GW_HWNDNEXT);<br> end;<br> end;<br>end;<br> А на резуьтат в калькуляторе не обращяй внимания, я так просто для показа набросал, не смотрел на результат!... =( |
1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)
0 пользователей:
[ Script execution time: 0,0223 ] [ 15 queries used ] [ Generated: 17.05.24, 11:30 GMT ]