如何将下述用vc++编写的程序翻译成Delphi(100分)

G

guoa

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大侠请帮忙:如何将下述用vc++编写的程序翻译成Delphi
头文件声明:
CPLAYER_API void __stdcall MP4_ServerSetStart(void(CALLBACK *StartCap)(int nChannel));

void CALLBACK StartCap(int port);
在过程中调用函数StartVideoCapture(ChannelHandle[port])
void CALLBACK StartCap(int port)
{
StartVideoCapture(ChannelHandle[port]);
}
 
真的没有高手?
 
不是因为他难, 而是代码不完整, 没发翻译
 
一个过程调用另一个过程,
而另一个过程调用一个函数.
 
Type
TStartCap = Procedure(Port:Integer);
Var
StartCap : TStartCap;
Procedure MP4_ServerSetStart(StCap:TStartCap);stdcall;{ 若在DLL中,加 external '某某.dll' }
Procedure StartCap(port:Integer);
begin
StartVideoCapture(ChannelHandle[port]);
end;
 
呵呵,在做海康卡呀,wql已给你答了,
 
有外部程序打开就好啦,简单又好用。
 
我是庸人
 

Similar threads

D
回复
0
查看
739
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
顶部