Вопрос № 27163: Здравствуйте уважаемые эксперты! У меня к вам несколько вопросов:
1.Как имея на форме Slider1 регулировать громкость (всей винды) и чтобы при нажатии на Command1 звук вообще отключался?
2.Как сделать что бы окно программы было поверх всех дру...
Вопрос № 27.163
Здравствуйте уважаемые эксперты! У меня к вам несколько вопросов:
1.Как имея на форме Slider1 регулировать громкость (всей винды) и чтобы при нажатии на Command1 звук вообще отключался?
2.Как сделать что бы окно программы было поверх всех других окон?
Private Declare Sub SetWindowPos Lib "User32" _
(ByVal hWnd As Long, _
ByVal hWndInsertAfter As Long, _
ByVal X As Long, _
ByVal Y As Long, _
ByVal cx As Long, _
ByVal cy As Long, _
ByVal wFlags As Long)
Private Sub Form_Activate()
'Поставить окошко наверх
SetWindowPos Me.hWnd, _
HWND_TOPMOST, 0, 0, 0, 0, _
SWP_NOACTIVATE Or SWP_SHOWWINDOW Or _
SWP_NOMOVE Or SWP_NOSIZE
End Sub
1. Смотрите МСДН.
--------- Учиться никогда не поздно. Особенно программированию!