Commander le VLC media player depuis MATLAB

Version imprimable

11/02/2008, 23h01
Vassili68

Commander le VLC media player depuis MATLAB

Bonjour,

j'aimerais savoir si il est possible de commander par exemple VLC media player grâce à MATLAB. J'arrive à lancer VLC avec MATLAB mais je ne sais pas si je peux par exemple lire un fichier, faire pause et lecture etc... Merci pour vos réponses

Un exemple sous Windows avec le control ActiveX de VLC (à télécharger ici et à installer si ce n'est déjà fait ;))

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
function vlc
 
fig = figure('position',[381 188 500 400],...
    'menubar','none',...
    'numbertitle','off');
 
actx = actxcontrol('VideoLAN.VLCPlugin.1', ...
    'position',[20 60 460 320], ...
	'parent',fig);
 
vi = get(actx,'VersionInfo');
vr = version('-release');
 
set(fig,'name',sprintf('VLC media player (%s) in MATLAB %s',vi,vr))
 
actx.volume = 50;
 
uicontrol('units','pixels','position',[20 20 80 20],...
    'string','Select',...
    'tag','sel',...
    'callback',@pickmovie)
 
uicontrol('units','pixels','position',[20+80+140/3 20 80 20],...
    'string','Play',...
    'tag','pla',...
    'callback',@playmovie)
 
uicontrol('units','pixels','position',[20+2*(80+140/3) 20 80 20],...
    'string','Pause',...
    'tag','pau',...
    'callback',@pausemovie)
 
uicontrol('units','pixels','position',[20+3*(80+140/3) 20 80 20],...
    'string','Stop',...
    'tag','sto',...
    'callback',@stopmovie)
 
    function pickmovie(obj,event)
 
        [fichier,chemin] = uigetfile({'*.avi;*.mpg;*.mpeg;*.ogg;*.flac;*.flv';'*.avi';'*.mpg';'*.mpeg';'*.ogg';'*.flac';'*.flv'}, ...
            'Select a movie file');
 
        invoke(actx,'addTarget',fullfile(chemin,fichier),[],1,int32(1));
 
    end
 
    function playmovie(obj,event)
 
        invoke(actx,'play')
 
    end
 
    function pausemovie(obj,event)
 
        invoke(actx,'pause')
 
    end
 
    function stopmovie(obj,event)
 
        invoke(actx,'stop')
 
    end
 
end

12/02/2008, 21h11
Vassili68

ok je te remercie !!
14/02/2008, 17h59
Vassili68

J'ai encore une petite question ^^ : est-il possible de lancer les taches select play pause et stop sans cliquer dessus ? Je m'explique, je veux les lancer a partir d'un autre programme du genre : Si ceci=cela, alors lancer select. J'ai essayer plusieurs choses mais je n'arrive à rien ... Merci +
14/02/2008, 18h01
Jerome Briot

Citation:

Envoyé par Vassili68

J'ai essayer plusieurs choses mais je n'arrive à rien ...

On pourrait avoir un aperçu de ce que tu as essayé ?
14/02/2008, 18h18
Vassili68

Ben maintenant j'ai tout effacé vu que ça marchait pas ^^ mais en gros jarrivais pas a appeler les fonction pickmovie, playmovie etc... afin de ne pas être obligé de cliquer sur select etc... donc comment puis-je faire pour "simuler" un clic ?
Pour lancer vlc par exemple je fais :

code :

if indx1==1
vlc
end

Jusque la tout va bien, après pour ouvrir la fenêtre select c'est un autre problème. Est-ce réalisable ?

Le problème vient du fait que les fonctions (choix, lecture, pause, stop) sont des fonctions imbriquées. Leur visibilité n'est donc assurée qu'à l'intérieur de la fonction vlc.

Tu peux mettre chaque fonction dans un fichier m et modifier leur appel dans vlc. Et utiliser GUIDATA/GUIHANDLES pour gérer la visibilité des variables entre les fonctions.

Fichier vlc.m :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
function vlc
 
fig = figure('position',[381 188 500 400],...
    'menubar','none',...
    'numbertitle','off');
 
actx = actxcontrol('VideoLAN.VLCPlugin.1', ...
    'position',[20 60 460 320], ...
	'parent',fig);
 
vi = get(actx,'VersionInfo');
vr = version('-release');
 
set(fig,'name',sprintf('VLC media player (%s) in MATLAB %s',vi,vr))
 
actx.volume = 50;
 
uicontrol('units','pixels','position',[20 20 80 20],...
    'string','Select',...
    'tag','sel',...
    'callback','pickmovie')
 
uicontrol('units','pixels','position',[20+80+140/3 20 80 20],...
    'string','Play',...
    'tag','pla',...
    'callback','playmovie')
 
uicontrol('units','pixels','position',[20+2*(80+140/3) 20 80 20],...
    'string','Pause',...
    'tag','pau',...
    'callback','pausemovie')
 
uicontrol('units','pixels','position',[20+3*(80+140/3) 20 80 20],...
    'string','Stop',...
    'tag','sto',...
    'callback','stopmovie')
 
handles=guihandles(fig);
handles.actx=actx;
guidata(fig,handles)

Fichier pickmovie.m :

Code:

1
2
3
4
5
6
7
function pickmovie
 
	[fichier,chemin] = uigetfile({'*.avi;*.mpg;*.mpeg;*.ogg;*.flac;*.flv';'*.avi';'*.mpg';'*.mpeg';'*.ogg';'*.flac';'*.flv'}, ...
        'Select a movie file');
 
    handles=guidata(gcbf);
	invoke(handles.actx,'addTarget',fullfile(chemin,fichier),[],1,int32(1));

Fichier playmovie.m :

Code:

1
2
3
4
function playmovie
 
	handles=guidata(gcbf);
	invoke(handles.actx,'play')

Fichier pausemovie.m

Code:

1
2
3
4
function pausemovie
 
    handles=guidata(gcbf);
	invoke(handles.actx,'pause')

Fichier stopmovie.m :

Code:

1
2
3
4
function stopmovie
 
	handles=guidata(gcbf);
	invoke(handles.actx,'stop')

Les trois dernières fonctions étant très similaires, on peut les réunir dans un seul fichier. Soit au final :

Fichier vlc.m

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
function vlc
 
fig = figure('position',[381 188 500 400],...
    'menubar','none',...
    'numbertitle','off');
 
actx = actxcontrol('VideoLAN.VLCPlugin.1', ...
    'position',[20 60 460 320], ...
	'parent',fig);
 
vi = get(actx,'VersionInfo');
vr = version('-release');
 
set(fig,'name',sprintf('VLC media player (%s) in MATLAB %s',vi,vr))
 
actx.volume = 50;
 
uicontrol('units','pixels','position',[20 20 80 20],...
    'string','Select',...
    'tag','sel',...
    'callback','pickmovie')
 
uicontrol('units','pixels','position',[20+80+140/3 20 80 20],...
    'string','Play',...
    'tag','play',...
    'callback','actionmovie')
 
uicontrol('units','pixels','position',[20+2*(80+140/3) 20 80 20],...
    'string','Pause',...
    'tag','pause',...
    'callback','actionmovie')
 
uicontrol('units','pixels','position',[20+3*(80+140/3) 20 80 20],...
    'string','Stop',...
    'tag','stop',...
    'callback','actionmovie')
 
handles=guihandles(fig);
handles.actx=actx;
guidata(fig,handles)

Fichier pickmovie.m

Code:

1
2
3
4
5
6
7
function pickmovie
 
	[fichier,chemin] = uigetfile({'*.avi;*.mpg;*.mpeg;*.ogg;*.flac;*.flv';'*.avi';'*.mpg';'*.mpeg';'*.ogg';'*.flac';'*.flv'}, ...
        'Select a movie file');
 
    handles=guidata(gcbf);
	invoke(handles.actx,'addTarget',fullfile(chemin,fichier),[],1,int32(1));

Fichier actionmovie.m

Code:

1
2
3
4
function actionmovie
 
    handles=guidata(gcbf);
    invoke(handles.actx,get(gcbo,'tag'))

14/02/2008, 19h11
Vassili68

Ok merci c'est niquel !:yaisse2:
14/02/2008, 19h32
Vassili68

Oops j'ai parlé trop vite... J'ai des messages d'erreurs : quand je lance pickmovie j'ai bien la fenêtre qui s affiche mais quand je sélectionne un film et je l'ouvre ça bloque... Voici le rapport d'erreurs :

Citation:

??? Error using ==> guidata at 89
H must be the handle to a figure or figure descendent.

Error in ==> pickmovie at 6
handles=guidata(gcbf);

Tu as une explication ?

Citation:

Envoyé par Vassili68

Tu as une explication ?

Non :aie:

Je rigole :mrgreen:... ça arrive quand tu as une interface avec plusieurs objets Figure qui s'ouvrent et se referment. Une solution :

Fichier vlc.m
Code:

1 2 3 4 fig = figure('position',[381 188 500 400],... 'menubar','none',... 'numbertitle','off',... 'tag','vlcfig');
Fichier pickmovie.m
Code:

1 2 3 4 5 6 7 function pickmovie [fichier,chemin] = uigetfile({'*.avi;*.mpg;*.mpeg;*.ogg;*.flac;*.flv';'*.avi';'*.mpg';'*.mpeg';'*.ogg';'*.flac';'*.flv'}, ... 'Select a movie file'); handles=guidata(findobj('type','figure','tag','vlcfig')); invoke(handles.actx,'addTarget',fullfile(chemin,fichier),[],1,int32(1));
Faire la même modification avec les GUIDATA dans les autres fonctions

15/02/2008, 12h22
Vassili68

Ok maintenant c'est niquel :mouarf: juste une petite rectification, le vlcfig doit être entre ' '. Merci beaucoup pour ton aide ;)
15/02/2008, 12h31
Jerome Briot

Citation:

Envoyé par Vassili68

juste une petite rectification, le vlcfig doit être entre ' '.

Rectifié ;)