فیلم

[Mralihjz 0]

سلام من میخواستم یه فیلم رو تو یه پنل نمایش بدم اما وقتی وارد اکتیویتی میشم برنامه میپره بیرون چیکار کنم؟

#Region  Activity Attributes
    #FullScreen: False
    #IncludeTitle: false
#End Region

Sub Process_Globals

End Sub

Sub Globals
Dim vid As VideoView
    Private Panel1 As Panel
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("splash2")
vid.Initialize("vid")
    Panel1.AddView(vid,vid.Left,vid.Top,vid.Width,vid.Height)
vid.LoadVideo(File.DirAssets,"MOV_1843.mp4")
vid.Play

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

 

[Mr.Kafiri 221]

در 5 ساعت قبل، Mralihjz گفته است :

سلام من میخواستم یه فیلم رو تو یه پنل نمایش بدم اما وقتی وارد اکتیویتی میشم برنامه میپره بیرون چیکار کنم؟

#Region  Activity Attributes
    #FullScreen: False
    #IncludeTitle: false
#End Region

Sub Process_Globals

End Sub

Sub Globals
Dim vid As VideoView
    Private Panel1 As Panel
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("splash2")
vid.Initialize("vid")
    Panel1.AddView(vid,vid.Left,vid.Top,vid.Width,vid.Height)
vid.LoadVideo(File.DirAssets,"MOV_1843.mp4")
vid.Play

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

 

فیلم رو باید بریزید داخل حافظه بعد فراخونی کنید