ftimeout(self);
end;
而属性则是根据私有成员来设定了：
public
property count:integer read fcount default 0; //计数值的只读属性，这个属性不能声明在published中，因为它是只读的，只在程序运行时通过它来得到计数值。
published
property interval:tinterval read finterval write setinterval default tenm;
property active:boolean read factive write setactive default false;
property ontimeout:tnotifyevent read ftimeout write ftimeout;
此外还有几个自定义方法即
procedure pause; //暂停计数
procedure resume;//从暂停的计数开始计数。
procedure stop;//停止
procedure start;//开始计数
都比较简单。
三，父类属性的显化：
