国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

打開APP
userphoto
未登錄

開通VIP,暢享免費(fèi)電子書等14項(xiàng)超值服

開通VIP
在delphi7中不使用任何第三方控件,實(shí)現(xiàn)放在工具欄上可拖動(dòng)的xp風(fēng)格菜單.
對(duì)于不想第三方控件但又想加點(diǎn)效果的朋友可能有點(diǎn)用.實(shí)現(xiàn)的效果如圖:

步驟一:把Win32面板上把CoolBar組件加到窗體上

步驟二:把Additional面板上的ActionMainMenuBar組件加到CoolBar組件上.(注意一定要放在CooBar 組件上)

步驟三:把Win32面板上的PageScroller組件同樣加到CoolBar組件上.

步驟四:把Additional面板上的ActionToolBar組件加到PageScrooler組件上(注意放在PageScroolerh 上)

步驟五:把Additional面板上的ActionManager組件加到窗體上

步驟六:把CoolBar組件的AutoSize屬性設(shè)為True

步驟七:選擇ActionManager組件,雙擊它的的ActionBars屬性,在彈出的Editing ActionManager1.ActionBars框中增加兩個(gè)TActionBarItem,選擇第一個(gè)TActionBarItem,雙擊它的Items屬性,在彈出的框中增加兩個(gè)ActionClientItem,把兩個(gè)ActionClientItemCaption屬性分別設(shè)成"文件" ,"編輯", 再在ActionClientItem中的Items屬性增加ActionClientItem, 并把它們的Caption屬設(shè)成"新建","打開"之類的.如果你想在新建里面再出現(xiàn)子菜單,那么就在它的Items屬性再增加ActionClientItem,設(shè)好Caption內(nèi)容.  選擇第二個(gè)TActionBarItem,按照上面所講的方法同樣增加ActionClientItem,并設(shè)好Caption屬性.

步驟八:選擇第一個(gè)TActionBarItem, 設(shè)它的ActionBar屬性為ActionMainMenuBar,選第二個(gè)TActionBarItem,設(shè)它的ActionBar屬性為ActionToolBar.

步驟九:運(yùn)行程序,相信你已經(jīng)看到所圖所示的效果.致于其它很多屬性,讀者自己去分析.

本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊舉報(bào)
打開APP,閱讀全文并永久保存 查看更多類似文章
猜你喜歡
類似文章
Flex移動(dòng)開發(fā)第一步(Flex Mobile View and ViewNavigato...
用C++ Builder讓軟件字幕動(dòng)起來
Delphi 7中 ActionMainMenuBar、ActionManager、Action、actionlist的用法
使用dxNavBar動(dòng)態(tài)創(chuàng)建應(yīng)用程序菜單
100項(xiàng)PPT制作技術(shù)
Delphi 框架Frames的使用
更多類似文章 >>
生活服務(wù)
分享 收藏 導(dǎo)長(zhǎng)圖 關(guān)注 下載文章
綁定賬號(hào)成功
后續(xù)可登錄賬號(hào)暢享VIP特權(quán)!
如果VIP功能使用有故障,
可點(diǎn)擊這里聯(lián)系客服!

聯(lián)系客服