[code cpp]
VOID CALLBACK WINAPI FrameCallBack( LPVOID lpParam1, LPVOID lpPoint, LPVOID lpContext )
{
UCHAR *pRgb = (UCHAR*)lpParam1;
OutputDebugString( "Frame CallBack!!!!!!!");
CDLCWBDEMODlg* pDLDlg = (CDLCWBDEMODlg*)lpContext; static Count = 0;
TCHAR Buf[256];
_stprintf( Buf, "%d", Count );
OutputDebugString( Buf );
pDLDlg->ReadPin( Count % 8 );
Count ;
}
[/code]

[code delphi]
procedure FrameCallBack(lpParaml:Pointer;lpPoint:Pointer;lpContext:Pointer);stdcall;
var
pRgb:Byte;
TChar:array[0..255] of char;
pDLDlg:TForm1;
Lpin:Integer;
begin
pRgb:=Byte(lpParaml);
Form1.Edit1.Text:=IntToStr(Count mod 8);
Form1.ReadPin(Count mod 8);
Count:=Count 1;
end;
[/code]
c的呼叫 HqDLSetFrameCallback( m_hDevice, FrameCallBack, this );
Delhi HqDLSetFrameCallback( m_hDevice, @FrameCallBack, Form1);
請問這是一個CCD DLC300-L的部份碼 由於並未提供Delphi SDK(目錄上說有，拿到的光碟只有C)
請教各位前輩這樣改為Delphi對嗎 請大大指正 謝謝