Страница: 1 |
Страница: 1 |
Вопрос: Как найти окно?
Добавлено: 19.09.04 20:08
Автор вопроса: Монах
Кто знает как найти окно, например Windows Media, и если оно найдено, то выполнять какие-то действия?
Ответы
Всего ответов: 11
Номер ответа: 1
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #1
Добавлено: 19.09.04 22:42
Смотри в мыло скинул OCX
Номер ответа: 2
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #2
Добавлено: 19.09.04 22:42
О! Выше юбилей (600), принимаю поздравления
Номер ответа: 3
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #3
Добавлено: 19.09.04 23:09
Это зависит от того, что ты имеешь... Если заголовок окна, то FindWindow, если ID процесса, то перебор всех окон с проверкой на принадлежность к PID...
Номер ответа: 4
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #4
Добавлено: 19.09.04 23:10
ЗЫ
Хакер, поздравляю
Номер ответа: 5
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #5
Добавлено: 19.09.04 23:10
Ну ты Мэрс
Номер ответа: 6
Автор ответа:
Александр
Разработчик Offline Client
ICQ: 204034
Вопросов: 106
Ответов: 1919
Профиль | | #6
Добавлено: 20.09.04 09:12
HACKER, поздравляю!
sne, да и у тебя тоже 2526 ответов (и 13 вопросов)!
Номер ответа: 7
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #7
Добавлено: 20.09.04 10:13
Угу... вопросов аж целая дюжина ) пусть даже и чертова
А вот до юбилея с ответами еще далеко, сейчас это только &H9DE..
Номер ответа: 8
Автор ответа:
Павел
Администратор
ICQ: 326066673
Вопросов: 368
Ответов: 5968
Web-сайт:
Профиль | | #8
Добавлено: 21.09.04 08:59
sne скоро лидером форума станет
Номер ответа: 9
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #9
Добавлено: 21.09.04 11:51
прикольно все-равно у тебя две надписи не смотрятся
ЗЫ
У мня инет кончился т..ч нет... не стану
Номер ответа: 10
Автор ответа:
Монах
Вопросов: 26
Ответов: 35
Профиль | | #10
Добавлено: 21.09.04 14:31
прошу прощения что долго не отвечал, чё-то на форум всё никак не мог зайти... Мне нужна функция поиска окна первого уровня Find Window. Я хочу сделать полупрозрачный Windows Media Player, возможно ли это?
P.S. У меня Windows XP Pro
Номер ответа: 11
Автор ответа:
Mihalыch
ICQ: 373-509-101
Вопросов: 56
Ответов: 330
Профиль | | #11
Добавлено: 21.09.04 15:56
Ф-я возвращает манипулятор активного окна передового уровня Private Declare Function GetForegroundWindow Lib "user32" () As Long
Потом когда найдешь нужное окно:
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Const LWA_ALPHA = &H2
Private Const GWL_EXSTYLE = (-20)
Private Const WS_EX_LAYERED = &H80000
Sub Transparent()
 im Ret As Long
Ret = GetWindowLong(hwnd, GWL_EXSTYLE)
Ret = Ret Or WS_EX_LAYERED
SetWindowLong hwnd, GWL_EXSTYLE, Ret
SetLayeredWindowAttributes hwnd, 0, 100, LWA_ALPHA
‘ hwnd – то, что вернула ф-я GetForegroundWindow
End Sub
Должно сработать.