程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> Delphi >> 用Delphi4實現風Word97格的工具欄

用Delphi4實現風Word97格的工具欄

編輯:Delphi
用過Word97的人對它的工具欄印象很深刻,因為它的風格很“酷”,同樣IE4.0的工具欄也有類似的風格,Win98的出現,使這種風格的工具欄得到了推廣。其實,用Delphi4很容易實現具有Word97風格的工具欄。
    在Delphi4的元件選項板Additional頁中,新增了Controlbar元件,此元件和Win32頁中的Toolbar、Coolbar配合使用,再輔以Imagelist、Mainmenu等元件,完全可以實現具有Word97風格的工具欄。下面以一個FORM中的工具欄為例,詳細介紹設計步驟:    
    1從Additional頁中選擇Controlbar,將其放入FORM1中,設置其屬性如下:Allign:=altopAutosize:=trueBevelkind:=bknone
    2從Win32頁中選擇Toolbar,將其放於Controlbar上,調整Toolbar的位置,使其置於最左,再調整其寬度,設置屬性Edgeborders:=[],Flat:=TRUE。用鼠標右擊Toolbar,在浮動菜單上選擇Newbutton,重復若干次,設計好所需的按鈕。
    3從Win32頁中選擇Imagelist元件,為FORM1設計主菜單,主菜單的設計方法同Delphi2、Delphi3。設計好主菜單後,將其屬性Automerge置為TRUE。
    4最後為每一個按鈕分配Tmenuitem的Name值,將每個按鈕的Menuitem屬性值設為所需菜單的Name值。
    按F9運行程序,便可發現,設計出的工具欄已經具有Word97的風格,用鼠標在各個按鈕上移動,按鈕自動上浮,單擊鼠標,彈出相應的菜單。需要說明的是,Mainmenu的屬性Automerge置為TRUE,是為了不讓主菜單出現在FORM1的最上端。工具欄的設計必須將Controlbar與Toolbar結合使用,不然得不到與Word97外觀一樣的工具欄 
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved