07-31-2013, 11:24 PM
Simple Testcase with the original delivered videos from MITOV:
(Used MITOV Version: 6.0.0.9)
Starting this TestApp several times gives the following results.
- the videos are all flipped ...
- the videos will not start everytime ...
(testing with fullhd videos will also result in an application crash !)
Source:
Imports Mitov.VideoLab
Public Class Form1
Private Const m_ChannelCount As Integer = 12
Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Dim IndexX As Integer
Dim ImageDisplayX As DSImageDisplay
Dim VideoPlayerX As DSVideoPlayer
For IndexX = 1 To m_ChannelCount
ImageDisplayX = New DSImageDisplay
ImageDisplayX.Stretch = True
ImageDisplayX.UseVMR = True
ImageDisplayX.Size = New System.Drawing.Size(200, 200)
FlowLayoutPanel1.Controls.Add(ImageDisplayX)
VideoPlayerX = New DSVideoPlayer
VideoPlayerX.OutputPin.Connect(ImageDisplayX.InputPin)
VideoPlayerX.Loop = True
'VideoPlayerX.FileName = "C:\Videos\" + CStr(IndexX) + ".avi" ' renamed "V0201-cinepak.avi" 1..12
VideoPlayerX.FileName = "C:\Videos\1.avi" ' renamed "V0201-cinepak.avi" 1
VideoPlayerX.Start()
Next
End Sub
Private Sub Form1_ResizeEnd(sender As Object, e As System.EventArgs) Handles Me.ResizeEnd
Me.Text = Me.Size.ToString
End Sub
End Class
(Used MITOV Version: 6.0.0.9)
Starting this TestApp several times gives the following results.
- the videos are all flipped ...
- the videos will not start everytime ...
(testing with fullhd videos will also result in an application crash !)
Source:
Imports Mitov.VideoLab
Public Class Form1
Private Const m_ChannelCount As Integer = 12
Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Dim IndexX As Integer
Dim ImageDisplayX As DSImageDisplay
Dim VideoPlayerX As DSVideoPlayer
For IndexX = 1 To m_ChannelCount
ImageDisplayX = New DSImageDisplay
ImageDisplayX.Stretch = True
ImageDisplayX.UseVMR = True
ImageDisplayX.Size = New System.Drawing.Size(200, 200)
FlowLayoutPanel1.Controls.Add(ImageDisplayX)
VideoPlayerX = New DSVideoPlayer
VideoPlayerX.OutputPin.Connect(ImageDisplayX.InputPin)
VideoPlayerX.Loop = True
'VideoPlayerX.FileName = "C:\Videos\" + CStr(IndexX) + ".avi" ' renamed "V0201-cinepak.avi" 1..12
VideoPlayerX.FileName = "C:\Videos\1.avi" ' renamed "V0201-cinepak.avi" 1
VideoPlayerX.Start()
Next
End Sub
Private Sub Form1_ResizeEnd(sender As Object, e As System.EventArgs) Handles Me.ResizeEnd
Me.Text = Me.Size.ToString
End Sub
End Class