Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 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-сайт: hw.t-k.ru
 Профиль | | #3
Добавлено: 19.09.04 23:09
Это зависит от того, что ты имеешь... Если заголовок окна, то FindWindow, если ID процесса, то перебор всех окон с проверкой на принадлежность к PID...

Ответить

Номер ответа: 4
Автор ответа:
 sne



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
 Web-сайт: hw.t-k.ru
 Профиль | | #4
Добавлено: 19.09.04 23:10
ЗЫ
Хакер, поздравляю :)

Ответить

Номер ответа: 5
Автор ответа:
 CyRax



Разработчик Offline Client

ICQ: 204447456 

Вопросов: 180
Ответов: 4229
 Web-сайт: basicproduction.nm.ru
 Профиль | | #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-сайт: hw.t-k.ru
 Профиль | | #7
Добавлено: 20.09.04 10:13
Угу... вопросов аж целая дюжина :)) пусть даже и чертова ;)
А вот до юбилея с ответами еще далеко, сейчас это только &H9DE..

Ответить

Номер ответа: 8
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #8
Добавлено: 21.09.04 08:59
sne скоро лидером форума станет :)

Ответить

Номер ответа: 9
Автор ответа:
 sne



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
 Web-сайт: hw.t-k.ru
 Профиль | | #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()
    ;Dim 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

Должно сработать.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам