private declare function Checkpassword lib "your.dll" (i as integer) as boolean

解决方案 »

  1.   

    奇怪,它说找不到入口,难道那个DLL有错
    lib "your.dll",那个YOUR。DLL要不要跟上路径啊????
      

  2.   

    写上全路径
    或者
    把DLL文件复制到SYSTEM32(2000 OR NT) OR SYSTEM(9X)目录中最后记得注册它 REGSVR32 YOUR。DLL
      

  3.   

    不行了啦
    好像我写的DLL有问题。帮我看下哪错了。library Dllform;
    uses
      SysUtils,
      Classes,
      frm in 'frm.pas' {Form1};
      exports
      CheckPassword ;//name 'CheckPassword';//dll入口
      //procedure mydefdll(strk:Pchar):export;dllcall;
    {$R *.res}
    begin
    end.
    下面的是入口:
    var
      Form1: TForm1;
      function CheckPassword(i:integer):boolean;stdcall;export;  function CheckPassword(i:integer):boolean;stdcall;export;
      begin
         showmessage('hello');
      end;