程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> Delphi >> Delphi3中制作快速按鈕條

Delphi3中制作快速按鈕條

編輯:Delphi
快速按鈕條上的每一個圖形按鈕都代表著一項常用的功能保庑┩夾偉磁コ叽缃掀脹ǖ耐急甏螅梢苑胖酶蟆⒏蝸蟮耐夾危踔量梢源霞蚨痰奶崾荊舛雜谟沒е蔥凶畛S玫墓δ芎苡邪铩≈;谏鮮鲈颍嚼叢蕉嗟腤indows應用程序采用快速按鈕條來改善應用程序的界面。筆者在用Delphi3編程過程中,采用了兩種不同的方法來實現快速按鈕條,本文結合制作一個具有兩組共六個按鈕的快速按鈕條的實例,列出了這兩種方法的具體設計步驟。 
  一、Panel+SpeedBubbon+Bevel組合 
  1、在窗體上放置一個Panel1對象,作為圖形按鈕的載體。 
  2、設置Panel1的屬性Caption為空,屬性Align為alTop,調整其高度至合適尺寸。 
  3、在Panel1上放置六個SpeedButton按鈕(選用SpeedButton,是因它具有浮動特性)。 
  4、在panel1上放置兩個Bevel對象,調整其位置和大小,用於分隔按鈕組。 
  5、調整SpeedButton1的大小及在Panel1中的位置。 
  6、選擇SpeedButton1,設置其屬性Flat為True。 
  7、單擊SpeedButton1的屬性Glyph所對應的省略號小按鈕,打開PictureEditor窗口,選擇一個象征“查詢”的圖標。設置屬性ShowHint為True,屬性Hint為“查詢”。 
  8、按步驟5至7的方法,分別設置好其余幾個SpeedButton按鈕的屬性。 
  這樣,一個快速條就制作完成。運行時,快速按鈕均以浮動方式顯示,當鼠標移至其上時,即顯示按鈕外框,並顯示小提示。 
  二、借用ToolBar 
  因TToolBar實際上是工具條組件,用它來實現快速按鈕條,只能算借用。 
  1、在窗體上放置一個ToolBar1對象。 
  2、設置ToolBar1的屬性EdgeBorders.ebLeft、ebTop、ebRight、ebButtom均為True;屬性Flat為 True;調整ToolBar1的大小至合適尺寸。 
  3、選擇ToolBar1,用右鍵呼出快速菜單,分別點擊NewButton和NewSeparator增加六個按鈕ToolButton和兩條分隔欄線。 
  4、任意選擇一個ToolButton按鈕,調整其大小至合適尺寸,所有的ToolButton也同時被調整好。 
  5、設置ToolBar1的屬性BorderWidth為3,以調整ToolButton的位置。 
  6、在窗體上放置一個ImageList1對象,設置它的屬性Height和Width的數值,以適應較大尺寸的圖像(這一步非常重要,讀者可自己體會)。 
  7、雙擊ImageList1,通過“Add”按鈕分別裝入六個圖像,與ToolBar1中的六個ToolButton一一對應。 
  8、設置ToolBar1的屬性Images為ImageList1。 
  9、設置六個ToolButton的屬性ShowHint為True,並分別設置各自的小提示屬性Hint。 
  10、還可以設置ToolBar1的HotImages指定鼠標指向按鈕時的圖片集。 
  采用ToolBar實現的快速條在外觀上與第一種方法類似。 
  三、孰優孰劣? 
  以上兩種方法均能實現快速按鈕條,但各有千秋:第一種設計過程較為簡單,第二種方法則提供了更多的功能,如可用HotImages指定鼠標指向按鈕時的圖片集。讀者不妨從中選擇一種,並可繼續完善其功能,例如將其放入CoolBar中。編程環境為Win 95、Delphi3。 
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved