Board logo

標題: [Delphi] 動態產生,刪除元件及觸發事件 [打印本頁]

作者: admin    時間: 2011-1-3 00:07     標題: [Delphi] 動態產生,刪除元件及觸發事件

以下是動態產生及刪除元件例子,當按 butCreate 時,Panel1 內便會動態產生 button,按 butRemove 時,便自動刪除剛產生的 button,MaxValue 決定可以產生元件 (label) 的最多數量 ,加入了 butarray[but_i].OnClick 後,在這些動態產生的 button 上按 click,會觸發自行定義的Procedure butarrayAction, 由於 Click 所有動態產生的 button 都是觸發 butarrayAction,我們利用 Sender 的 tag 來判斷是 Click 了哪一個Button 觸發 butarrayAction。

本帖隱藏的內容需要回復才可以瀏覽

[attach]698[/attach]




歡迎光臨 How2Do (http://forum.how2do.com.hk/) Powered by Discuz! 7.2