Ciao a tutti, ho questo problema, vorrei provare a riprodurre un dvd video con mplayer dando però il comando da gambas.
Il codice che uso è questo:
Public Sub ToolButton1_Click()
$Process = Exec ["mplayer dvdnav://1 /dev/dvd"] For Input Output As "Process"
End
Ma non va, sapreste aiutarmi?
Ciao.
Ciao a tutti, ho questo problema, vorrei provare a riprodurre un dvd video con mplayer dando però il comando da gambas.
Il codice che uso è questo:
Public Sub ToolButton1_Click()
$Process = Exec ["mplayer dvdnav://1 /dev/dvd"] For Input Output As "Process"
End
Ma non va, sapreste aiutarmi?
Ciao.
Con Exec i comandi vanno separati ciascuno con le virgolette e la virgola (tranne l'ultimo ovviamente) alla fine. Quindi:
Private $Process As Process
Public Sub ToolButton1_Click()
$Process = Exec ["mplayer", "dvdnav://1", "/dev/dvd"] For Input Output As "Process"
End
Ok, ho aggiunto questo, modificando ovviamente come mi hai suggerito, però non riesco ad avviare mplayer nella mia finestra, ecco il codice:
Public Sub ToolButton1_Click()
$Process = Exec ["mplayer", "dvdnav://1", "/dev/dvd", "-wid", CStr(DrawingArea1.Handle)] For Read Write As "Process"
End
Ho aggiunto -wid per inserire il video nella drawingarea ma cosi non gli piace...
Ho risolto scrivendo in questo modo:
$Process = Exec ["mplayer", "-wid", CStr(DrawingArea1.Handle), "dvdnav://1", "/dev/dvd"] For Read Write As "Process"
Non chiudo il topic, perché potrei aver bisogno ancora del vostro aiuto, magari alla fine scrivo due riga(col vostro aiuto) su come utilizzare mplayer, se la cosa vi interessa!!! :P