User`s manual

Function Library 83
int Bitrate = 0, frame_rate = 0,
colorspace = 0;
AngeloMPEG4_Decode_Get_Config(channel,
&iWidth, &iHeight, &videoformat,
&colorspace, &Bitrate, &frame_rate);
}
}
Result = AngeloMPEG4_Decode_Set_Callback(channel,
Decode_Callback);
< Visual Basic >
Dim Result As Long, channel As Long
Public Sub lpcallback(ByVal channel As Long,
ByVal int_status As Long, ByVal
VideoBufferaddress As Long)
If int_status And &H2 Then
'detected motion
ElseIf int_status And &H4 Then '
connect to encoder
ElseIf int_status And &H1 Then '
image ready
End If
End Sub
Result =
AngeloMPEG4_Decode_Set_Callback(channel,
AddressOf lpcallback)
< Delphi >
procedure DecoderCallbackProc(channel:Longint;
int_status:Longint;
VideoBufferaddress:Longint); stdcall
var
Str_Addr: Pointer;