DELPHI 高手帮忙看一下下面的代码

帮忙看一下下面这段代码，我这样调用DLL里的函数对不对？？？？？？
。
。
。implementation{$R *.DFM}
  function  SEH_InitialSession(HANDLE:Thandle;num1:integer;usertder:pchar;password:pchar;num2:integer;num3:integer;rootcert:pchar;unkonw:pchar):integer;cdecl external 'SafeEngine.dll';procedure TForm1.Button1Click(Sender: TObject);
var
    path:string;
    cert:string;
    hdle:thandle;
begin
   path:=extractfilepath(paramstr(0));
   if SEH_InitialSession(hdle,2,'D:\wangjian\oracle青浦\CA LICENSE\casureproject\UserKey.key','dd2d8793',0,2,'D:\wangjian\oracle青浦\CA LICENSE\casureproject\rootcert.der','')<>0 then
        begin
                ///terminate application
        end;
end;