迷 迷惘的人 Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-11 #1 CPLAYER_API void __stdcall MP4_ServerSetStart(void(CALLBACK *StartCap)(int port)); 这是C++中的一个函数原型,怎样把它转换成Delphi的函数原型?
CPLAYER_API void __stdcall MP4_ServerSetStart(void(CALLBACK *StartCap)(int port)); 这是C++中的一个函数原型,怎样把它转换成Delphi的函数原型?
L LittleIsland Unregistered / Unconfirmed GUEST, unregistred user! 2002-10-12 #3 你可以按下面方法试一下 type TProc = procedure(Port:Integer) stdcall; procedure StartCap(Port:Integer);stdcall; procedure MP4_ServerSetStart(Proc:TProc);stdcall; procedure StartCap(Port:Integer); begin …… end; procedure MP4_ServerSetStart(Proc:TProc); begin …… end; begin …… MP4_ServerSetStart(StartCap); …… end;
你可以按下面方法试一下 type TProc = procedure(Port:Integer) stdcall; procedure StartCap(Port:Integer);stdcall; procedure MP4_ServerSetStart(Proc:TProc);stdcall; procedure StartCap(Port:Integer); begin …… end; procedure MP4_ServerSetStart(Proc:TProc); begin …… end; begin …… MP4_ServerSetStart(StartCap); …… end;