Bonjour à tous !
Voila je souhaite utiliser l'ActiveX du lecteur multimedia VLC dans une application Delphi 6.
J'ai installé la version (v1.1.10) complète de VLC avec l'ActiveX, puis j'ai installé l'ActiveX dans Delphi : pas de problème.
J'ai donc essayé de créer une 1ère application en écrivant ceci :
Lorsque je clique sur le bouton, le film se lance. Par contre lorsque je ferme l'application, la fenêtre se ferme mais elle reste en mémoire !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 type VLCPlayListMode = TOleEnum; Const VLCPlayListInsert = $00000001; VLCPlayListReplace = $00000002; VLCPlayListAppend = $00000004; VLCPlayListGo = $00000008; VLCPlayListCheckInsert = $00000010; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin VLCPlugin1.addTarget('C:\film.avi' ,null, VLCPlayListInsert, 0); VLCPlugin1.play; end;
Que dois-je faire ?
Partager