aprè avoir pas mal galéré pour trouver les références de l'activeX de VLC, lequel choisir, comment lui faire manger des fichiers ou des DVD, j'ai réussi à peu près:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
var
  Voption : array of String;
  CheminChaine : String;
begin
    CheminChaine := 'dvd://'+mrl_text.Text  ;   
    VLC1.playlistClear;
    VLC1.addTarget(CheminChaine,'vout-filter=deinterlace,deinterlace-mode=blend',8,0); 
    VLC1.play;

mais là ou je galère, c'est que l'activeX ne semble pas prendre en compte l'entete DVDsimple: là ou en script il le digère sans problème, à la lecture ou l'encodage:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
var
  mpeg_file : string;
  Voption : array of String;
  CheminChaine : String;
 
begin
    CheminChaine := trim(mrl_text.Text)  ;
 
mpeg_file := '/c start "Mpeg2TS" /MIN "'+vlc_acces_text.text+'vlc.exe" dvdsimple://'+CheminChaine+'  :sub-track='+st.text+'  :audio-track='+audio.text+' :sout=#transcode{vcodec=mp4v,vb=1024,scale=0.5,acodec=mpga,ab=192,channels=2,soverlay,vout-filter=deinterlace,deinterlace-mode=blend}:duplicate{dst=std{access=file,mux=mp4,dst="'+directorylistbox1.Directory+'\'+dest_filename.Text+'.mp4"}}:sout-all ';
 
RunAndWaitShell(pchar('cmd.exe'),Pchar(mpeg_file),Sw_HIDE);
quelqu'un a déjà lu directement le film sans passer par la phase menu via l'activeX ?