Other VideoView --> CustomView

[MarcoRome]

Hi @Erel
Is it possibile VideoView as CustomView ( 5.8 ) ?
Thank you
Regards
Marco

 

[Erel]

Class code:

#Event: Complete
#DesignerProperty: Key: MediaControllerEnabled, DisplayName: MediaC ontroller Enabled, FieldType: Boolean, DefaultValue: True
Sub Class_Globals
   Private EventName As String 'ignore
   Private CallBack As Object 'ignore
   Private mBase As Panel
   Private vv As VideoView
End Sub

Public Sub Initialize (vCallback As Object, vEventName As String)
   EventName = vEventName
   CallBack = vCallback
   vv.Initialize("vv")
End Sub

Public Sub DesignerCreateView (Base As Panel, Lbl As Label, Props As Map)
   mBase = Base
  vv.MediaControllerEnabled = Props.Get("MediaControllerEnabled")
   mBase.AddView(vv, 0, 0, mBase.Width, mBase.Height)
End Sub

Private Sub vv_Complete
   CallSub(CallBack, EventName & "_complete")
End Sub

Public Sub GetBase As Panel
   Return mBase
End Sub

Public Sub getVideoView As VideoView
   Return vv
End Sub

The project is attached.

 

[moster67]

Nice!

 

[MarcoRome]

Thank you very much Erel