I am new to libVLC but not to Delphi.
I want to play a simple video on a panel on my form with libVLC.
All functions throw no error but no video comes up.
Test System:
i7 12 GB mem
Vista 64
XP 32 in vMWare (to try if the OS is the problem)
Test-video is running as expected in standaloneplayer vlc.exe.
Tried in and outside the Dev Studio.
Tried with/without path:
// args[0] := pchar('--plugin-path=' + VLD_LibPath ); -> more evil, floatingpoint overflow?!?
Also tried args: dummy -I --ignore-config
Tried in debugger.
Tried in the vMWare with XP.
Tried standalone outside Dev Studio.
Nothing brings me a picture, no errors. All handles not zero if I print them out.
Actual the default path of my app is in the path where the vlclib.dll is.
Dll is loaded dynamically, correct.
I manualy set the workingdirectory in delphi for this app to: "C:\Program Files (x86)\VideoLAN\VLC"
my code, just for "play with init":
After every function I have a "CheckError" not shown here.
Code: Select all
const
fnTest = 'E:\IMG_0046.MOV';
var
hVlc : libvlc_instance;
VLCError : libvlc_exception;
m : libvlc_media;
hMPlayr : libvlc_media_player;
...
FillChar(VLCError, SizeOf(VLCError),0);
Args[0] := nil;
hVlc := libvlc_new( 0, @Args[0], VLCError);
m := libvlc_media_new( hVlc, PCHAR( fnTest), VLCError );
hMPlayr := libvlc_media_player_new_from_media( m, VLCError );
libvlc_media_release( m );
libvlc_media_player_set_hwnd( hMPlayr, panel1.Handle, VlcError );
libvlc_media_player_play( hMPlayr, VlcError );
...
please help