Здравствуйте, Аноним, Вы писали:
А>Конкретно момент нажаия на главное меню, может где есть сорцы как это сделать или направление где копать.
Привет!
strComputer = "."Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = 'excel.exe'")
i=0
For Each objProcess In colProcessList
objProcess.Terminate
i=i+1
Next
if i=0 then
msgbox"Найдено " & i & " приложений Execle'й"else
msgbox"Было убито приложений Execle'й =" & i
end if
Так пойдёт?
Нельзя смеяться над патриархами.
"Патриархи"
nnnnn
| — _ |
| O o |
[ '\(_) /`]
\___/
Re[2]: Как подцепиться к WndProc на VB6.0. Нужно опред событ
Re[2]: Как подцепиться к WndProc на VB6.0. Нужно опред событ
От:
Аноним
Дата:
01.06.04 14:03
Оценка:
Здравствуйте, kig, Вы писали:
kig>Здравствуйте, Аноним, Вы писали:
А>>Конкретно момент нажаия на главное меню, может где есть сорцы как это сделать или направление где копать.
kig>здесь kig>здесь kig>здесь
Сделал я то что там написано, Basic просто падает с предложением отослать ошибку.
Re[3]: Как подцепиться к WndProc на VB6.0. Нужно опред событ
А>Сделал я то что там написано, Basic просто падает с предложением отослать ошибку.
Значит сделал что-нить неправильно.
А тебе нажатие меню надо отловить в другом приложении, или в своем???
Имею скафандр — готов путешествовать!
Re[4]: Как подцепиться к WndProc на VB6.0. Нужно опред событ
От:
Аноним
Дата:
02.06.04 10:57
Оценка:
Здравствуйте, rus blood, Вы писали:
А>>Сделал я то что там написано, Basic просто падает с предложением отослать ошибку.
RB>Значит сделал что-нить неправильно. RB>А тебе нажатие меню надо отловить в другом приложении, или в своем???
Да в своем. Дело в том, что при нажатии на меню фокус не снимается с элементов, и нужно сгенерить событие что реально фокус на меню, а не на элементе управления.
Re: Как подцепиться к WndProc на VB6.0. Нужно опред событие
