动态链接库问题？？急用？？

Question

我是动态调用的，前面定义了
TInStr = function(Source: PChar;Check: Char): Integer;stdcall;
后面是
Order := TInstr(PFunc)(txt,Key);
是不是stdcall的错误呀？？
请各位大侠指教，函数的动态调用怎么写呀？？一定给分的不够可以追加？？

Answer 1

我.dll中是
exportsInstr Index 1 name 'MyInStr' resident;

Answer 2

你要这样写
var
  h： THandle；
begin
  h ：= loadlibrary(''); //动态连接库文件
  PFunc := gettprocessname('MyInStr');
  Order := TInstr(PFunc)(txt,Key);
  FreeLibrary(h);
  
end；