ADLINK Technology RTV Series User Manual page 114

Result = AngeloRTV_Capture_Config (ByVal PortNo,
ByVal Start_Field)
Result = AngeloRTV_Capture_Start (ByVal PortNo,
ByVal CaptureNo)
Result = AngeloRTV_Sync_Grab (ByVal PortNo,
StrAddr, Width, Height, Size_Byte)
Result = AngeloRTV_Capture_Stop (ByVal PortNo)
<Delphi >
AngeloRTV_Capture_Config –
AngeloRTV_Capture_Start –
AngeloRTV_Sync_Grab –
AngeloRTV_Capture_Stop –
Var
Result : SmallInt;
PortNo: SmallInt;
CaptureNo: LontInt;
Start_Field: LontInt;
StrAddr: Pointer;
Width, Height, Size_Byte: LongInt;
begin
PortNo:=0;
Start_Field :=0;
CaptureNo:= INFINITE;
Result := AngeloRTV_Capture_Config (PortNo,
Start_Field);
Result := AngeloRTV_Capture_Start (PortNo,
CaptureNo);
Result := AngeloRTV_Sync_Grab (PortNo, StrAddr,
Width, Height, Size_Byte);
Result: = AngeloRTV_Capture_Stop (PortNo);
end;
104 Function Library