OpenChannel=Function (nChannelNo:Integer;plHandle:PHandle)什么意思？谢谢！

Question

var TKLSDK_OpenChannel=Function (nChannelNo:Integer; pChannelType:PInteger; plHandle:PHandle)
        :Boolean;stdcall;TKLDLLHandle:=LoadLibrary(PChar(ExtractFilePath(Application.ExeName)+'TklSdkAll.dll'));
    pTKLSDK_InitPreview:=GetProcAddress(TKLDLLHandle,'TKLSDK_InitPreview');这两句话什么意思？请指教，谢谢！

Answer 1

动态调用DLL的函数~~
var TKLSDK_OpenChannel=Function (nChannelNo:Integer; pChannelType:PInteger; plHandle:PHandle):Boolean;stdcall;//声明一个函数类型的变量~~
//Function (nChannelNo:Integer; pChannelType:PInteger; plHandle:PHandle):Boolean;stdcall;就是TKLSDK_InitPreview的参数序列和返回值~~
TKLDLLHandle:=LoadLibrary(PChar(ExtractFilePath(Application.ExeName+'TklSdkAll.dll'));//加载TklSdkAll.dll
pTKLSDK_InitPreview:=GetProcAddress(TKLDLLHandle,'TKLSDK_InitPreview');//获得TKLSDK_InitPreview函数的指针~让后付值给~TKLSDK_OpenChannel函数类型的变量~~
//用TKLSDK_OpenChannel就可以调用TklSdkAll.dll动态连接库中的TKLSDK_InitPreview函数~！
//使用完以后可以用FreeLibrary来释放加载的动态动态连接库~~~

Answer 2

谢谢！你开发过成都德加拉的视频采集卡的程序？能不能发给我一个实现其功能的demo程序？
我第一次做windows程序，以后请多指教！我的msn：[email protected]