Filmato per VB6

[ciucciatiilcalzino]

è possibile caricare nel momento che si lancia un exe un filmato che poi quando finisce va direttamente al primo form?

e poi e' possibile dare la trasperenza a un picturebox?
sto inserendo una gi trasperente ma mi da sempre uno sfondo sotto che è impostato in backcolor

mille grazie

[codo82]

Aggiungi alla form1 del programma il controllo Windows Media Player, al quale togli le barre dei pulsanti e tutto il resto, ci sono delle apposite proprietà nell'oggetto, quindi:

Private Sub Form_Load()
MediaPlayer1.Open ("Percorso del video")
End Sub

Private Sub MediaPlayer1_EndOfStream(ByVal Result As Long)
form2.Show
End Sub

[ciucciatiilcalzino]

mille grazie ora provo...buona pasqua

[ciucciatiilcalzino]

fatto
ma non va ..come credo..o come dovrebbe andare
ho fatto un nuovo form...
poi da componenti ho selezionato windows media player
a questo punto mi compare a sinistra il simbolo di media player
lo inserisco sul nuovo form e gli sostiuisco il nome

poi nel codice di questo primo form metto questo

Private Sub Form_Load()

MediaPlayer1.openPlayer (App.Path & "\pippo.avi")

End Sub

Private Sub MediaPlayer1_EndOfStream(ByVal Result As Long)
frmAvvio.Show


End Sub

e a questo punto lancio
e mi si apre media player a parte mentre sotto mi resta il form1 (dove avevo messo il player) con il player che ha i tasti disabilitati.

quando il media player che si è aperto finisce il filmato non succedete niente

se vedi il codice ho usato openPlayer a posto di open
perchè open non è supportato

poi non sono riuscito a levare le barre nel player sul form

è giusto che si deve apri un altro player

penso...che forse...MediaPlayer1_EndOfStream non funzioni proprio perchè si apre a parte..forse

dove sbaglio?

[MMarzia]

se non sbaglio puoi anche utilizzare le funzioni MCI o visualizzare il video in una picturebox

[Sypher]

Originariamente inviato da ciucciatiilcalzino

fatto
ma non va ..come credo..o come dovrebbe andare
ho fatto un nuovo form...
poi da componenti ho selezionato windows media player
a questo punto mi compare a sinistra il simbolo di media player
lo inserisco sul nuovo form e gli sostiuisco il nome

poi nel codice di questo primo form metto questo

Private Sub Form_Load()

MediaPlayer1.openPlayer (App.Path & "\pippo.avi")

End Sub

Private Sub MediaPlayer1_EndOfStream(ByVal Result As Long)
frmAvvio.Show


End Sub

e a questo punto lancio
e mi si apre media player a parte mentre sotto mi resta il form1 (dove avevo messo il player) con il player che ha i tasti disabilitati.

quando il media player che si è aperto finisce il filmato non succedete niente

se vedi il codice ho usato openPlayer a posto di open
perchè open non è supportato

poi non sono riuscito a levare le barre nel player sul form

è giusto che si deve apri un altro player

penso...che forse...MediaPlayer1_EndOfStream non funzioni proprio perchè si apre a parte..forse

dove sbaglio?

Dopo che hai incluso l'oggetto da components mettilo sul form,automaticamente verrà chiamato MediaPlayer1 e il codice che ti ha suggerito codo82 funzionerà perfettemente!
te l'aveva pure detto!

Originariamente inviato da codo82
Aggiungi alla form1 del programma il controllo Windows Media Player,

[ciucciatiilcalzino]

l'ho fatto

a questo punto mi compare a sinistra il simbolo di media player
lo inserisco sul nuovo form e gli sostiuisco il nome

già prima quando mi dava i problemi che ho descritto

[Sypher]

Originariamente inviato da ciucciatiilcalzino
l'ho fatto

già prima quando mi dava i problemi che ho descritto

ok allora te lo riconosce l'evento open?

[codo82]

Ma non è che il componente windows media player lo hai preso da 'Oggetti inseribili'?
Lo devi prendere da 'Controlli', da lì deve funzionare.

[ciucciatiilcalzino]

ok allora te lo riconosce l'evento open?

no, mi riconosce l'evento MediaPlayer1.openPlayer...
..che mi fà aprire un'altro mediaplayer col video che và mentre sul form1 su cui ho inserito il mediaplayer non succede nulla (si vede il player ,senza il video dentro)

Ma non è che il componente windows media player lo hai preso da 'Oggetti inseribili'?   Lo devi prendere da 'Controlli', da lì deve funzionare.

ho controllato...io l'ho inserito da Progetto -> Componenti
e poi controlli, ma ho visto che nel momento che lo seleziono in controlli si seleziona da solo anche in oggetti inseribili

in ogni caso
ancora non riesco ad andare avanti
dato che si apre il player esterno e che poi non mi funziona
MediaPlayer1_EndOfStream

comunque grazie