正在阅读：Delphi控件，我们也可以(3)Delphi控件，我们也可以(3)

2004-02-14 09:34 出处：PConline 作者：刘鑫责任编辑：zwg

实践第二步——动手做 先启动Delphi6，选择File菜单下的New|Other...在New Items中选“Package”，起个好名字，把它存好，这是封装组件的包文件。

图2：新的包从这里添加　　再它的Package界面上点Add按钮，弹出的Add对话框中选New Component页面，在Ancestor type中选TLabel [QstdCtrls]，ClassName为TTouchLabel， Palette Page 是你要把它放在哪一个组件板上，可以自己指定一个新的噢。在 Unit file name 中指定好文件名（存好啊）。点OK，在Package中就可以看到这个.pas文件了，它就是我们一会儿要添加的CLX 控件。再ADD 一个， Ancestor type选TLabel [StdCtrls]，文件名不要起重，其它一样，这就是VCL组件。

图3：添加新控件——注意“Ancestor type”，那是组件的父类，也就是你要从哪个类派生出你自己的新控件。