[delphi步步精通]第7章常用組件-在線瀏覽
2024-07-31 20:19本頁面
【正文】 和編輯具有指定格式的文本，如特定格式的時間等。 EditLabel 、 LabelPosition 、 LabelSpaceing 編輯框組件 (3) 【 例 73】 文本類組件的使用。 ? 在 Form1的 Oncreate事件中添加如下代碼： procedure (Sender: TObject)。文本類組件演示程序 39。39。 :=1。 :=2。 。amp。 :=39。Add39。 圖 75 文本類組件使用 編輯框組件 (4) ? 在 Edit1組件的 Onchange事件中加入如下代碼： procedure (Sender: TObject)。 end。 begin 。 :=39。 end。 begin 。 :=temp。 列表框組件和組合框組件 在 Windows應(yīng)用程序中 ， 除了一些無規(guī)律數(shù)據(jù)的輸入外 ， 大量地使用了特定數(shù)據(jù)的錄入和編輯 。 列表框和組合框組件對于減少用戶輸入 ， 增加程序的易用性方面都有極大的幫助 。 列表框組件 即 ListBox組件，位于組件面板的 standard標簽頁，它們以滾動列表的形式顯示條目以供用戶選擇，極大減輕了用戶對應(yīng)用程序的操縱。 ? 進入 Delphi 2個 Memo組件和 2個Label組件。 begin :=39。 :=true。 :=true。 (39。)。Operating System39。 (39。)。Application of Database 39。 (39。)。Software Engineering39。 end。 var i:Integer。 begin 列表框組件 (2) i:=。 st:=。 end。 var i:Integer。 (i)。 ? 程序運行結(jié)果如圖 76所示。如果右邊已經(jīng)有的則不會再添加。 組合框組件 (1) DropDownCount屬性、 Dropped Down屬性、 Style屬性、OnDropDown事件。 為了最大限度地節(jié)省應(yīng)用程序窗口空間 ， Delphi 供了組合框組件 。 接下來介紹其獨特的一些常用的屬性及主要的事件和方法 。 ? 進入 Delphi 1個 Label組件和 2個ComboBox組件。 begin :=39。 :=8。宋體 39。 end。 begin :=GB2312_CHARSET 。 end。 begin :=strtoint()。 procedure (Sender: TObject)。 。 items:=。 end。 procedure (Sender: TObject)。 begin with bobox2 do begin 。 i:=1。 i:=i+2。 。 end。 圖 77 組合框演示程序 對話框組件和對話框函數(shù) 常用對話框組件 Delphi ：打開、存儲文件、設(shè)置字體和顏色、查找、打印、設(shè)置打印機組件等。 1. 打開文件對話框組件和保存文件對話框組件 OpenDialog組件和 SaveDialog組件有許多相似之處，不同是OpenDialog組件用于提供一個打開對話框，供用戶進行文件的選擇和打開，而 SaveDialog組件用于保存文件。 DefaultEXT屬性 、 Filter屬性 、 InitialDir屬性、 Title屬性 常用對話框組件 2. 字體對話框組件和顏色對話框組件 即 FontDialog組件和 ColorDialog組件。它們的常用屬性如下： MaxFontSize屬性、 MinFontSize屬性、 Options屬性、 Color屬性。 PrintDialog封裝了標準 Windows打印選項對話框，用于向打印機傳遞打印任務(wù)；PrintSetupDialog組件用來完成打印設(shè)置任務(wù)。 FindDialog組件封裝了標準 Windows的文本搜索對話框，允許用于在文件中查找一段文字； ReplaceDialog組件包含了 FindDialog的所有功能，用來完成文本的替換任務(wù)。 對話框函數(shù) (1) 1. ShowMessage（）函數(shù) 用于在程序運行過程中顯示一個包含字符串信息的對話框。用法如下： ShowMessage（ const Msg:string）； 例如： Procedure (Sender:TObject)。 2. MassageDlg（）函數(shù) 用于在程序運行過程中顯示一個包含一個字符串的位圖和按鈕等信息的對話框，用戶只有對這個對話框進行準確響應(yīng)后，才能關(guān)閉對話框，語法如下： Function MessageDlg(const Msg： string； Atype： TMsDlgType；Abuttons： TmsDlgButtons:HelpCtx： longint)： word； 其中 TmsDlgType 在 Windows 單元文件中有如下定義： 對話框函數(shù) (2) Type TMsgDlgType = (mtWarning, mtError, mtInformation, mtConfirmation, mtCustom)。 3. InputBox（）函數(shù) 該函數(shù)用于在程序運行過程中顯示一個包含字符串和按鈕信息的輸入對話框，用戶對這個對話框進行準確響應(yīng)后，才能關(guān)閉該對話框，在 Dialogs單
教學課件相關(guān)推薦
鄂ICP備17016276號-1