ActiveForm无法加载属性页

我有Delphi7做一个ActiveForm，在实现文件上放置了一个DBGrid控件，以及相应的ADO数据库组件，添加了一个属性页，包含About窗口。编译之后生成了OCX文件，但是在Delphi中测试的时候（已经正确注册并且导入到组件面板上），只能右键弹出关于对话框，但是没有属性页。怎么回事，很急呀，各位高手指点一下吧。
部分关键代码如下：
procedure TAlarmUtilsX.DefinePropertyPages(DefinePropertyPage: TDefinePropertyPage);
begin
  DefinePropertyPage(Class_PropertyPage1);
end;procedure TPropertyPage1.UpdatePropertyPage;
begin
  { Update your controls from OleObject }
  Label1.Color := OleObject.color;
end;procedure TPropertyPage1.UpdateObject;
begin
  { Update OleObject from your controls }
  OleObject.color := Label1.Color;
end;
说明：Label1是属性页上的一个测试组件。
另外，怎样在属性页中设定ActiveForm上的某个控件如DBGrid的参数，这个最重要！能给的分数有限，还请大家包涵，谢谢！以前做ActiveX的时候可以实现属性页，但是这个ActiveForm整了半天了。