win2000下dll调用出错(200分)

login.pas:
procedure gettext(var name:string;var password:string);export;
implementation
{$R *.DFM}
procedure gettext(var name:string;var password:string);
begin
frm:=tfrm.create(application);
try
if frm.showmodal=idok then
begin
name:=frmpassword.dxPickEdit1.Text;
password:=frmpassword.Edit1.Text;
end
else
application.Terminate;
finally
frm.Free;
end;
end;
end.


get.pas
procedure gettext(var name:string;password:string);far;
external 'login';
implementation
{$R *.DFM}
procedure Tfrmdll.FormCreate(Sender: TObject);
var
name:string;
password:string;
begin
gettext(name,password);
end;
上面是一个通用口令dll和它的调用程序，在win98/me中能正常运行，在
win2000中提示找不到login.dll,请各位指点

你将login.dll放在你的调用程序的目录下或者是NT安装盘符的/WINNT/system32目录下就不
会说找不到了.

只要让你的程序能找到就行

to zhangkan
调用程序目录和/winnt/system32下都放过，还是找不到呀
但在98/me下能通过

你能否将你的程序发给我,我看看到底哪儿有问题.我也有一个类似的程序,你要的话也可以
发给你.最好还是改你的好一些,如何?kan@freetrend.com.vn

to zhangkan
谢谢！

接受答案了.