Page 1 of 3
VLC for HMG
Posted: Sun Apr 25, 2021 11:31 pm
by AUGE_OHR
hi,
i have see VLC in MiniGUI c:\hmg.3.4.4\0\VLC\ and want to use it under HMG
so i change "MiniGUI.CH" to "HMG.ch" but there are some "different" ...
Code: Select all
DEFINE ACTIVEX Activex1
...
EVENTMAP { { E_MediaPlayerTimeChanged, "VLC_OnTimeChanged" } }
how can i get a Event under HMG from ActiveX
HMG have ON CHANGE but no ON SCROLL for a SLIDER
i understand
Code: Select all
oActivex := _HMG_aControlIds[..] -> _HMG_SYSDATA[...]
but why oActivex:Refresh() crash under HMG
MiniGUI
Code: Select all
oVlc := TVlc():New( Win1.Activex1.XObject )
HMG
Code: Select all
oVlc := TVlc():New( Win1.Activex1.Object )
where do i find #define TRUE / FALSE
so how to get VLC running under HMG
Re: VLC for HMG
Posted: Mon Apr 26, 2021 1:14 am
by danielmaximiliano
Hola Jimmy :
el ActiveX de VLC es axvlc.dll progid VideoLAN.VLCPlugin.2
Code: Select all
oVLC := CreateObject("AXVLC.VLCPlugin2")
Look here :
https://wiki.videolan.org/ActiveX/
Re: VLC for HMG
Posted: Mon Apr 26, 2021 1:41 am
by AUGE_OHR
hi,
thx for Answer.
i got VLC running but like my WMP Player i can "only" Get/Set Property or call Method
EVENTMAP seems the missing Point to receive Notify Events from ActiveX Control
---
i have look into MiniGUI c:\MiniGUI\SOURCE\h_activex.prg, which is "big", and HMG
in c:\hmg.3.4.4\SOURCE\c_controlmisc.c there is HB_FUNC( INITACTIVEX ) but that all
i guess i can´t get Notify Event under HMG while it have nothing like EVENTMAP, or
i have learn to get Windows Message ( WM_* ) Event under HMG but how about Notify Event from ActiveX
Re: VLC for HMG
Posted: Tue Apr 27, 2021 2:06 am
by danielmaximiliano
Hola Jimmy, en VFP hay un manejador de eventos dentro del IDE que maneja eventos de los controles ActiveX, puede leer aqui algo sobre lo que necesita
https://docs.microsoft.com/en-us/cpp/mf ... w=msvc-160
Re: VLC for HMG
Posted: Tue Apr 27, 2021 4:27 am
by AUGE_OHR
hi,
thx for Answer.
i have try to use c:\MiniGUI\SOURCE\h_activex.prg from MiniGUI Extended Version, which have the Solution, with HMG.
it also use i_UsrInit.ch but i was not able (yet) to include it into HMG.
i still have to learn how i can enhance HMG ...
Re: VLC for HMG
Posted: Wed Apr 28, 2021 4:21 am
by AUGE_OHR
hi,
i have re-write MiniGUI Extended Version VLC Sample to use under HMG
i also include axvlc.chm so you can look what Method and Property VLC ActiveX have.
HMG Version does not support Notify Events so i can´t get Mouse or Keyboard Events "from" VLC ( e.g. Fullscreen - Mode )
- VLC_EVENTS.JPG (51.91 KiB) Viewed 4190 times
---
about Help File and CLASS TVLC
Code: Select all
DATA oControl, oPlayList, oInput, oVideo, oAudio
in Help File look for "IVLC" instead of "o" ( oInput -> IVLCInput )
oControl is Object itself (VLCPlugin2) so you have in CLASS
Code: Select all
oControl:playlist
oControl:input
oControl:video
oControl:audio
Re: VLC for HMG
Posted: Wed Apr 28, 2021 2:40 pm
by chrisjx2002
Hello,
Very interested by this implementation of VLC in HMG. When compliling it, I got an error message : Can't open DLL.CH. Where can I download it?
Re: VLC for HMG
Posted: Wed Apr 28, 2021 7:03 pm
by AUGE_OHR
hi,
chrisjx2002 wrote: ↑Wed Apr 28, 2021 2:40 pm
When compliling it, I got an error message : Can't open DLL.CH. Where can I download it?
i forgot that DLL.CH is Part of c:\hmg.3.4.4\HARBOUR\contrib\hbxpp\dll.ch
it is need for Function _GetShortPathName which use Constant DLL_OSAPI
Code: Select all
#ifndef _DLL_CH
#define _DLL_CH
#define DLL_CDECL 0x08
#define DLL_STDCALL 0x20
#define DLL_SYSTEM 0x04
#if defined( __PLATFORM__WINDOWS )
#define DLL_OSAPI DLL_STDCALL
#elif defined( __PLATFORM__OS2 )
#define DLL_OSAPI DLL_SYSTEM
#else
#define DLL_OSAPI DLL_CDECL
#endif
/* Only for compatiblity.
Harbour always copies the string to a temporary buffer. */
#define DLL_CALLMODE_COPY 0
#define DLL_CALLMODE_NORMAL DLL_CALLMODE_COPY
#endif /* _DLL_CH */
Re: VLC for HMG
Posted: Wed Apr 28, 2021 9:47 pm
by danielmaximiliano
Hola Jimmy :
no existe myplayer.ico y da error
- 2021-04-28 18_44_07-MyPlayer.png (26.7 KiB) Viewed 4115 times
Re: VLC for HMG
Posted: Wed Apr 28, 2021 11:08 pm
by AUGE_OHR
hi,
danielmaximiliano wrote: ↑Wed Apr 28, 2021 9:47 pm
no existe myplayer.ico y da error 2021-04-28 18_44_07-MyPlayer.png
oh, sorry
have upload new HMG_VLC.ZIP which include myplayer.ico and DLL.CH
---
hm ... Error point to Line 282 and say Method does not exit
Code: Select all
282 ::oPlaylist := oControl:playlist
it come from
Code: Select all
// create VLC object
127 oVlc := TVlc():New( Win1.Activex1.Object )
so i have to ask if VLC is installed
Code: Select all
VLC ActiveX Plugin and IE Web Plugin v2
{9BE31822-FDAD-461B-AD51-BE1D1C159921}