请教：怎样在delphi Active X控件里调用DLL 急

请问：怎样在delphi Active X控件里调用DLL 急急！！！
打扰大家一下啊！！


在有一个现成DLL,有一个函数可调用,我需要用delphi       ActiveX   做一个ActiveX控件,调用DLL里的函数,
现在的问题是:
1.怎样在ActiveX加载DLL里的函数,
2.我已经用下面这种方法调出了test1函数：
Th:=LoadLibrary( 'E:\test\test.dll ');   //装载DLL
if   Th> 0   then
try
Tp:=GetProcAddress(Th,PChar( 'test1 '));
if   Tp <> nil
then   begin
Tf:=TIntFunc(Tp);
Tf(False);   {调用test1函数}
Result:=true;
end

3.生成test.ocx   在test.htm网页上运行。
4.在本机上测试没有问题，因为我装载DLL使用的是绝对路径。
5.客户机上浏览test.htm网页就出问题了。test.dll   找不到。
6.用extractfilepath获取路径是客户浏览器的路径。
7.我是不是应该把：test.dll打包成.cab让客户机安装？？？
8.我应该怎样获取:test.dll路径呢？
9.还是从一开始我调DLL的方法就有问题啊！！！
我是菜鸟，大虾们帮帮我啊。

------解决方案--------------------
我刚好也遇到这个问题，帮楼主顶！