《Delphi 5.X ADO.MTS.COM+高级程序设计篇》中遇到的两个问题(200分)

[]
我的编程环境：Win98+MSSQLServer7+Delphi6
1．1、第9-2节：正确使用TDCOMConnection建立MTS/COM+对象
将修改后的ComObj.pas拷贝到项目目录，并将其添加到项目中来，编译时总是提示：
[Error] ComObj.pas(1364): Undeclared identifier: 'GetObjectContext'
[Error] ComObj.pas(1364): Operator not applicable to this operand type
[Error] ComObj.pas(1369): Missing operator or semicolon
[Error] ComObj.pas(1386): Undeclared identifier: 'GetObjectContext'
[Error] ComObj.pas(1386): Operator not applicable to this operand type
[Error] ComObj.pas(1413): Missing operator or semicolon
[Fatal Error] PQueryCoorObj.dpr(8): Could not compile used unit '../Source/ComObj.pas'
无法通过继续进行下去。
1．2、第9-4节：MTS/COM+应用系统架构的实现：
实现客户端“取得Publisher数据”按钮事件代码[如下]
procedure TForm1.BitBtn2Click(Sender: TObject);
var
qCoor:ImtsDemoQueryCoor;
vData:OleVariant;
begin
qCoor:=ComtsDemoQueryCoor.CreateRemote('Engine11');
qCoor.GetPublishers(cDatas);
cdsPublishers.Data:=vDatas;
cdsCDs.Data:=vDatas;
end;
编译时总是报错：
[Error] frmGetCustomer.pas(37): Undeclared identifier: 'ImtsDemoQueryCoor'
[Error] frmGetCustomer.pas(40): Undeclared identifier: 'ComtsDemoQueryCoor'
[Error] frmGetCustomer.pas(40): Missing operator or semicolon
[Error] frmGetCustomer.pas(41): Missing operator or semicolon
[Error] frmGetCustomer.pas(41): Undeclared identifier: 'cDatas'
[Error] frmGetCustomer.pas(42): Undeclared identifier: 'cdsPublishers'
[Error] frmGetCustomer.pas(42): Missing operator or semicolon
[Error] frmGetCustomer.pas(43): Undeclared identifier: 'cdsCDs'
[Fatal Error] CustomerMng.dpr(5): Could not compile used unit 'frmGetCustomer.pas'