Cadodraw41中的findobj用法(100分)

请教各位如何使用TcdDataMod的FindObject函数：
下面是帮助文件的说明：
FindObject returns a pointer to a graphic object found in the data module.

function FindObject(ConObj: TConType): TcdObject;
Description

The FindObject method searches the data module for a graphic object and returns a pointer to that object if found. Else the FindObject method returns NIL.
The record of the type TConType passed as "ConObj" parameter contains the tool ID and the object ID of the wanted object.

能否给予指点（最好能给个例子）。

关于Findobject:
具体实现：

var
theObj: TConType;
findobj:TcdObject;
begin
theobj.Contype:=14; //Tool ID or object Classnr
theobj.ConID:=2; //object ID
findobj:=cdDataModule1.FindObject(theobj);
if findobj<> nil then
findobj.mark;
end;

本人已经装了Cadodraw41的控件，但不知怎么用，如何还打开硬盘上的 *.dwg文件，
都需要哪几个控件？如何写语句？

To 永字八法
据我所知CadoDraw好像并不支持DWG文件
具体用法可参考附带说明文档和例子

真的吗？那怎么办？到哪里有能打开*.DWG文件的控件？

to 永字八法
我下载安装了cadodraw for delphi4可是编译运行时出现：
[Fatal Error] Unit1.pas(7): Unit CadoDraw was compiled with a different
version of ComCtrls.TToolButton 的提示
你是否碰到，不知如何解决这个问题！

接受答案了.