實踐第二步——動手做
先啟動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”，那是組件的父類，也就是你要從哪個類派生出你自己的新控件。
然後雙擊你所要編輯的文件，把代碼對應著填進去，就可以Compile了。沒什麼問題的話，點擊Install安裝，成功後會有提示信息告訴你，有哪些組件安裝成功了。記著在Tools菜單選Environment Options， 再選Library頁，在Library Path和Browsing path中Add 進你的代碼所保存的目錄。這樣你就可以使用剛剛加入的組件了。
其實，還有一個方法，把我的代碼保存為.pas文件，在Add組件時，選Add Unit頁， 把文件加進來就可以了。
圖4：你也可以省點事
通過這次實踐，我們應當會對Delphi6的組件管理、消息體系、CLX構架有所了解。現在高手之路已經在你的腳下了。成為真正的高手的一個障礙，你已經跨了過去，恭喜你！
圖5：我自己的組件板，你也會有的
