Visual Basic Example

Imports ScrRecXLib
...
Private m_Rec As FMScrRec
...

'
' Create Video Recorder
'
Private Sub CreateVideoRecorder()

  ' Create Video Recorder
  m_Rec = New FMScrRec
  ' Set Maximum Trace Level
  m_Rec.SetTraceLevel(9)

End Sub

'
' Start Recording
'
Private Sub StartRec()
  
  ' Screen Area
  m_Rec.Left = 100
  m_Rec.Top = 100
  m_Rec.Right = 400
  m_Rec.Bottom = 200
        
  ' Video Format
  m_Rec.VideoFormat = 0 ' AVI
  ' Video Codec
  m_Rec.VideoCodecName = "Microsoft Video 1"
  ' Audio Codec
  m_Rec.AudioCodecName = "PCM"
  
  ' Screen Area Alignment
  m_Rec.Alignment = 4
  ' Video File
  m_Rec.VideoFile = "test.avi"
  
  ' Frame Rate
  m_Rec.FramesPerSecond = 15.0
  ' Record Cursor: Yes
  m_Rec.RecordCursor = 1
  ' Highlight Cursor: No
  m_Rec.HighlightCursor = 0
  ' Flashing Border: Yes
  m_Rec.FlashingBorder = 1
  ' Key Frame Interval
  m_Rec.KeyFrameInterval = 100
  ' Follow Mouse: No
  m_Rec.FollowMouse = 0
  
  ' Record Audio: Yes
  m_Rec.RecordAudio = 1
 
  ' Start Recording
  m_Rec.Start(0)

End Sub

'
' Stop Recording
'
Private Sub StopRec()
  
  m_Rec.Stop()
  
End Sub