User`s manual

Function Library • 42
<Delphi >
procedure Encode_Callback
(Encoder_Index:Longint;int_status:Longint;var
param_struct:param_str);stdcall
var
{* add your var here *}
begin
case int_status of
1: begin {********* Image Ready *********}
end;
2: begin {********* Set Image Config Event
*********}
end;
4: begin {********* Connected Event *********}
end;
8: begin {********* Disconnect Event
*********}
end;
16: begin {********* Motion Detection Event
*********}
end;
end; // end case int_status of
end;
// Main Code
var
Encoder_Index, Result: Longint;
begin
Encoder_Index:= 0;
Result :=
AngeloMPEG4_Encode_Set_Callback
(Encoder_Index,
Encode_Callback);
end;
AngeloMPEG4_Encode_Start–
AngeloMPEG4_Encode_Stop–
AngeloMPEG4_Encode_Close–
@ Syntax
C/C++ (Windows 98/NT/2000/XP)
int AngeloMPEG4_Encode_Start(int Encoder_Index);
int AngeloMPEG4_Encode_Stop(int Encoder_Index);
int AngeloMPEG4_Encode_Close(int Encoder_Index);
Visual Basic (Windows 98/NT/2000/XP)
AngeloMPEG4_Encode_Start (ByVal
Encoder_Index
As Long) As Long
AngeloMPEG4_Encode_Stop (ByVal
Encoder_Index
As Long) As Long