[delphi步步精通]第7章常用組件-wenkub
2023-05-26 20:19:22 本頁面
【正文】 了一些無規(guī)律數據的輸入外 ， 大量地使用了特定數據的錄入和編輯 。 begin 。 :=39。 end。Add39。amp。 :=2。39。 ? 在 Form1的 Oncreate事件中添加如下代碼： procedure (Sender: TObject)。 Lines屬性、 Maxlength屬性、 ScrollBar 屬性、 WantReturns屬性、WantTabs屬性、 Clear方法、 Add方法、 SelectAll 方法、ClearSelection方法 編輯框組件 (2) 3. MaskEdit 組件 該組件位于組件面板的 Additional標簽頁，功能與 Edit組件相似，用于顯示和編輯具有指定格式的文本，如特定格式的時間等。 Alignment屬性、 Autosize 屬性、 Focuscontrol屬性、 Transparent屬性、WordWrap屬性、 ShowAccelChar屬性： 編輯框組件 1. Edit組件 位于組件面板的 Standard標簽頁，用戶可以在其中輸入單行文字或數據，同時可能用于顯示信息，下面介紹它的常用屬性及主要的事件和方法。 i:=0。 end else if i=1 then begin ? 程序運行過程中，可以通過連續(xù)單擊 next按鈕實現三個 SpeedButton的按下動作，按 Close按鈕退出程序。 按鈕類組件 (4) ? 在 B1按鈕的 OnClick事件中添加如下代碼，注意 i變量在 implementation之前應該先給予定義： var i:integer=0。 :=’next’。 :=true。 ? 進入 Delphi ，設計如圖 73所示窗體。 2. BitBtn 按鈕組件 位圖按鈕組件位于組件面板的 Additional標簽頁，與 Button組件所不同的是多了一個位圖符號在按鈕上，該組件用于創(chuàng)建一個其上帶有位圖的按鈕，其中大部分屬性和事件與 Button一致，這里僅介紹它所獨有的屬性。 注意： 由于只是為了演示組件的功能，所以對程序本身實現的意義并不關心，這一點需要注意。 begin :=clred。 圖 71 Components 對話框 窗體組件（ 1） 窗體是可以放置各種組件的一個窗口 ， 在運行時就是一個窗口 ， 它是應用程序的主要界面 ， 它的友好直接影響程序的使用和質量 。 Delphi 大量的可視組件，可以利用第三方組件的接口，豐富 Delphi ，本章介紹 Delphi ，在第 7章進一步介紹基于組件的開發(fā)。 打開 Delphi ，在 Component palette中選擇相關組件添加到默認表單中。 接下來介紹窗體的常用屬性和事件 。 end。 圖 72 窗體應用 72 窗體應用 按鈕類組件 (1) 在 Delphi ， 常用的按鈕類組件可分為三種：普通按鈕 （ Button） 組件 、 位圖按鈕 （ BitBtn） 組件和加速按鈕 （ Speed Button） 組件 。 常用屬性與事件： Kind屬性 Glyph屬性 NumGlyphs屬性 Layout屬性 OnClick事件 按鈕類組件 (2) 3. SpeedButton加速按鈕組件 加速按鈕組件位于組件面板的 Additional標簽頁，常常被放在Panel組件上，用于設計工具欄，它和 Bitbtn組件非常相似，也可以顯示圖像和文本，但通常只顯示圖像，它的特殊屬性如下。 圖 73 按鈕類實例程序 ? 該窗體上并排添加了三個名為 sb sb sb3的SpeedButton按鈕、一個名為 B1的 Button按鈕和一個名為 Bb1的 BitBtn按鈕，分別如下設置它們的屬性值： 按鈕類組件 (3) :=1。 :=False。 :=bkClose。 procedure (Sender: TObject)。 :=true。 end end。 編輯框組件 (1) AutoSelect 屬性、 CharCase 屬性、 MaxLength屬性、 Passwordchar屬性、Text屬性 Clear方法、 CopyToClipboard 方法、 CutToClipboard 方法 PasteFromClipboard 方法、 OnChange 事件、 當編輯框中的內容發(fā)生改變時，將觸發(fā)這個事件。 EditMask屬性 圖 74 Input Mask Editor對話框 4. LabelEdit組件 位于組件面板的 Additional標簽頁，它的作用相當于使用 Label組件和Edit組件的組合，常用屬性如下。 begin :=39。 :=0。 :=3。Clear39。 end。 ? 分別在 Button Button2的 Onclick事件中添加如下代碼： procedure (Sender: TObject)。39。 temp:=temp+。 對于這些有規(guī)律的數據 ， 就可使用列表框和組合框組件 。常用屬性： Colums屬性、 ExtendedSelect屬性、 Items屬性、 ItemHeight屬性 ItemIndex屬性、 MultiSelect屬性、 Sorted屬性、 Style屬性 【
教學課件相關推薦
鄂ICP備17016276號-1