Цитата:
Сообщение от Punchic
|
Активировать надо вот так:
'Это в самом начале модуля:
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
'А это процедура для активации:
Public Sub XWinActivate(XhWnd As Long)
Call SetForegroundWindow(XhWnd)
End Sub
Или можно просто в нужном месте написать:
Call SetForegroundWindow(XhWnd)
Где XhWnd - это дескриптор окна, например, frmTMS.hwnd
Цитата:
Сообщение от Luciefer
Лео, 1 апреля не за горами 
Запускаю видео. Хочу что бы файлы один за другим проигрывались без остановки. Можно с этим что-нибудь сделать?
|
Проверил на соседнем компьютере - все работает... Когда открываешь видео, поддерживаемое ЛеоКаром и он начинает его показывать во встроенном плеере, а справа список остальных видюшек в папке - то после окончания видео Лео проигрывает следующее в списке, точно так же, как и песни - ему вообще пофигу, что он играет, главное - как.
И режим полного экрана точно так же не меняется - если видео кончилось в полном экране, новое тоже начинается в полном.