procedure register;
begin
registercomponenteditor(tmytray,ttrayiconeditor);
end;
end.
至此,托盘组件完毕,拉下它放在窗体设计器中,双击,弹出对话框
里面内容为:“你好,这是风做的托盘组件!!”。哈哈,你成功啦
做为组件制作的最后一个内容,我想用一个包来把我的所有组件单元包含起来,并放在我自己新建的一个面板中。
这样做之前,要把以前安装下去的组件删除。知道怎么样删除,如果不知道,请看我在第一篇中说的。
然后在打开所有的组件单元,把registercomponents(‘samples', [tcoolmemo]);里面的
samples改为wind。然后保存
接着,在ide中点file-》new-》other…
弹出来的new items对话框,选中new页面,并选中其中的package,