国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 開發設計 > 正文

組件制作之二（一個簡單組件的制作過程）

2019-11-18 18:17:40
字體：大 中 小
來源：轉載
供稿：網友
接下來要動手來做一個組件了，我想了一個計數器組件，功能方面是比較簡單的，但這不是本章的重點，這一章的重點是說明一個組件的制作全過程。在其中可以學到很多組件制作的技巧，當然這些也是我從書上學得的。好了，開始制作吧：

 

這是一個可以計數的組件，為了簡單，我以秒為單位，當開始時，他就從0開始增加，并顯示出來，到3600時，它又回到0，如此循環。當然它也可以停止，暫停，繼續。另外，他還有一個時間事件，即可以設定每隔多少時間來觸發這個事件，這倒是一個好的功能，我們可以設半個小時觸發事件，在事件處理函數中來一個聲音，然后睡個覺，半個小時后，就由這個聲音來提醒你起床了。

 

我們一開始不要新建組件單元，而是把它當成一個工程中的一個類來應用，這樣更易于調試，于是我們新建一個工程，又新建一個空白單元用于放置這個類

 

一，確定父類：

 

接下來給這個類起名叫TTimeCount，那么它的父類應該是什么呢，它要能顯示出來，得有一個容量來讓他顯示，TPanel是個不錯的選擇，我看了一下源碼，發覺TPanel什么也沒有做，只是把它的父類TCustomPanel的屬性顯化出來（這個等一下講），TCustomPanel把好多的屬性聲明為
end;

end.

這時再把上面的組件類替換掉這個類就行啦（當然上面的注冊函數可要保留呀）。然后保存到上面所建的文件夾中。

 

接著就要安裝組件了，點Component->install Component

對話框中第一項Unit file Name，是組件單元.pas文件的路徑名字。其他只要按缺省。

           記得第三項的。。/delphi7/Lib/dclusr.dpk，這個就是存放組件的包名，等一下刪除組件時用到的

                   接下來點OK，就可以了，看看Samples是不是有了一個新組件啦。

                    

 不過面板上的組件圖標似乎不好看，應該給他一個新的圖標了：

 但之前應該把它先從面板刪除，File->Open…打開dclusr.dpk.

選中其中的Contains下的TimeCount.pas，點上面的Remove。將其刪除

然后再點Compile，重新將包編譯一次。就行啦。Samples上的新組件就消失了。

 

接下來是做組件圖標：

打開Image Eidtor，新建一個DCR文件，在其中建一個24×24的位圖，畫上你喜歡的圖標，將位圖的名字起為組件類名一樣，而且用大寫，即：TTIMECOUNT

將DCR文件起名為組件類所在單元名一樣，而且大寫，即：TIMECOUNT。

保存文件到單元所在的文件夾中，

最后依上面的方法再裝一次，看是不是有一個漂亮的圖標啦

 

 

六，講完了，大家應該有一個清楚的概念了吧，其中涉及到了好多的技巧。在以后的篇章中將不再講這些內容了，只把主要精力花在組件實現技術上。因為我們這個組件還是比較簡單，沒有涉及到多少高級的主題。但沒有關系，跟著我慢慢地做下來，你們會了解組件制作的方方面面的。 

上一篇：組件制作之三（圖形控件)

下一篇：組件制作之一(概念)

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
學習交流
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

主站蜘蛛池模板： 渭南市| 抚顺县| 商水县| 监利县| 东城区| 甘德县| 南漳县| 涪陵区| 大足县| 浮山县| 泰和县| 湖南省| 于都县| 崇仁县| 寿宁县| 磴口县| 松桃| 陆丰市| 四川省| 陇西县| 太湖县| 来宾市| 阿克苏市| 同江市| 苍梧县| 丰镇市| 鸡东县| 五常市| 兴安盟| 武清区| 张掖市| 伊宁县| 山西省| 会宁县| 文山县| 枣阳市| 靖远县| 双鸭山市| 洪湖市| 石阡县| 景泰县|