end;
procedure register;
implementation
procedure register;
begin
registercomponents('samples', [ttimecount]); //注册控件用的函数，自动帮你生成
end;
end.
这时再把上面的组件类替换掉这个类就行啦（当然上面的注册函数可要保留呀）。然后保存到上面所建的文件夹中。
接着就要安装组件了，点component->install component
对话框中第一项unit file name，是组件单元.pas文件的路径名字。其他只要按缺省。
记得第三项的。。\delphi7\lib\dclusr.dpk，这个就是存放组件的包名，等一下删除组件时用到的
