- Код: Выделить всё
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
...
- Код: Выделить всё
Dim WINDOW As String * 5
WINDOW = "PROGR"
hwnd = FindWindow(vbNullString, WINDOW)
- находим hwnd...
Всё нормально находится, но вот проблема - программа PROGR лежит в папке с таким же названием - PROGR.
Если программу закрыть, hwnd нулём всёравно не будет (а мне нужно для проверки) - он будет браться из открытой папки, с названием PROGR.
Как определить что нашлось - директория или программа?
------------
И если есть два варианта программы (название одно, а вес ехе-файла разный), можно ли узнать какая программа открыта?