同志门帮帮忙，对你们来说很简单的

Question

TComponent不是容器有ComponentCount的属性吗？？？？

Answer 1

to:wr960204(武稀松)　
我现在是这个属性在对象管理器里不显示呀

Answer 2

property componentsum:integer read ActionList default 2;
放在published内声明主　　题：同志门帮帮忙，对你们来说很简单的
作　　者：wd2306
所属论坛：Delphi
问题点数：20
回复次数：7
发表时间：2002-2-5 11:26:02
 
  
  我写了一个组件，可是我想显示componentcount这个属性，怎么没有啊，下面的代码什么地方有问题呀
unit myComponent;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
  TmyComponent = class(TComponent)
  private
    //ComponentList:TComponent;
    ActionList:integer;
    { Private declarations }
  protected
    { Protected declarations }
  public
  constructor createIt(Aowner:Tcomponent);
    { Public declarations }
  published
    property componentsum:integer read ActionList default 2;    { Published declarations }
  end;procedure Register;implementation
constructor TmyComponent.createIt(Aowner:Tcomponent);
begin
inherited Create(Aowner);
ActionList:=ComponentCount;
end;
procedure Register;
begin
  RegisterComponents('Samples', [TmyComponent]);
end;end.