[VB6] Finestra a tutto schermo

[marcotrumpet]

Salve, ho creato un semplice player di video ma non so come fare, in seguito a un doppio click sulla finestra o tramite un pulsante, a visualizzare il video a tutto schermo. E inoltre sarebbe possibile ridimensionare il formato delvideo per renderlo a mio piacimento più grande o più piccolo?

[tossam]

intendi questo?

form1.caption = ""
form1.controlbox = false
form1.windowstate = 2

[marcotrumpet]

no. ho provato ma non va bene. cmq io per eseguire un video uso le mci. con un codice così:

Private Sub Frame1_DblClick()

  On Error Resume Next
  
  Com = mciSendString("status video position", Buf, 128, 0)
  If FullScreen = False Then
    Com = mciSendString("play video fullscreen from " & CStr(Val(Buf)), 0, 0, 0)
    FullScreen = True
  Else
    Com = mciSendString("play video window from " & CStr(Val(Buf)), 0, 0, 0)
    FullScreen = False
  End If

End Sub

mi fa vedere il video a tutto schermo ma solo se continuo a tenere premuto il tasto sinistro del mouse del 2° click!!!come posso fare?

[Boolean]

è probabile che sull'evento MouseUp tu abbia qualche altro codice che ti impedisce la visualizzazione a schermo intero...

Boolean

[marcotrumpet]

ho risolto grazie!