Вниз
Скачать: CL | DM;

Как определить какое приложение запускается   Найти похожие ветки 

← →
Дубинин Алексей ©   (2003-10-31 21:55) [0]

Здраствуйте. Вопрос такой. Как можно определить какое приложение запускается, зная путь к исполняемому файлу.
Т.е. программа должна определить, что, например, запускается калькулятор, причем до этого в программе написан путь к исполняемому файлу. Дайте хотя бы идею...как это можно выполнить. Заранее спасибо...


← →
Игорь Шевченко ©   (2003-10-31 22:13) [1]

В форуме "система" был способ узнавания, что запустилось приложение.


← →
Дубинин Алексей ©   (2003-11-01 22:01) [2]


> Игорь Шевченко © (31.10.03 22:13) [1]
> В форуме "система" был способ узнавания, что запустилось
> приложение.


Просмотрел много, но ничего не нашел. Воспользовался вариантом Юрия Зотова использовать WH_SHELL в глобальной ловушке, но ничего не вышло. Пробовал установить ловушку на WH_GETMESSAGE и отлавливать WM_CREATE, но не ловится данное сообщение. Помогите пожалуйста.


← →
Song ©   (2003-11-02 09:38) [3]

Ошибка в 17-ой строке, Алексей.


← →
Дубинин Алексей ©   (2003-11-02 18:33) [4]

Отвечу сам себе:

function SysMsgProc1(code : integer; wParam : word; lParam : longint) : longint; stdcall;
begin
if code < 0 then
begin
Result:= CallNextHookEx(GlobalData^.SysHook1, Code, wParam, lParam);
Exit;
end;
//************************
if code = HSHELL_WINDOWCREATED then
if GlobalData^.H>0 then SendMessage(GlobalData^.H, WM_CREATEAPP, wParam, lParam);
CallNextHookEx(GlobalData^.SysHook1, Code, wParam, lParam);
Result:= 0;
end;

GlobalData^.SysHook1 := SetWindowsHookEx( WH_SHELL, @SysMsgProc1, HInstance, 0);

Спасибо jonni



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-99593
Tumcoat
2003-12-16 03:03
2003.12.30
Как программно в Word-е добавить таблицу?


3-99444
hursand
2003-12-06 11:32
2003.12.30
Использоват хранимых процедур


3-99462
RDen
2003-12-05 14:01
2003.12.30
Как восстановить удалённые записи из *.DBF?


3-99498
snake
2003-12-07 19:49
2003.12.30
Где можно найти инфу про ado rdsconnection....


8-99652
Gimer
2003-08-28 21:21
2003.12.30
Распечатать не из объекта?




   Наверх