朋友们为何没有能帮我一下了我我急

我现在在学多层数据
能CORBA但总是出错你能不能帮我一下了
我安http://tech.sina.com.cn/soft/2000-10-26/850.html上面的方法做出现的问题是：
1，在第4步时出问题
  没有找到BSTR *这个变量
2，最后我RUN时出问题
在PROJECT1_TLB中的
uses ActiveX, Classes, CORBAObj, CorbaStd, Graphics, Midas, OrbPas, 
StdVCL, SysUtils, Variants, Windows;
提示出错原因：
[Fatal Error] Project1_TLB.pas(33): File not found: 'OrbPas.dcu'这如何处理了大家帮一了
我的QQ：153639988
我的EMAIL：[email protected]
 下面是http://tech.sina.com.cn/soft/2000-10-26/850.html上的第四步操作方法
4)、该方法的返回类型应该是一个WideString。在Parameters页面的靠近顶端处设置它，这个方法的COM IDL是：HRESULT_Stdcall GetName([out,retval])BSTR *Name).而Delphi的声明是：Function GetName:WideString[dispid$00000001]；safecall;这个方法自动说明为Safecall，但这在Type Library Editor中可能不太明显。