《北京八维学校用BCB做出可移动的菜单》由会员分享,可在线阅读,更多相关《北京八维学校用BCB做出可移动的菜单(2页珍藏版)》请在金锄头文库上搜索。
1、北京八维学校用BCB做出可移动的菜单有三种方法:一:放一个 coolbar,在其上放一个 toolbar,设置 toolbar 的 showcaptions 为 true,flat 为true,在上面新建一个toolbotton加入一个popupmenu,设置好其items设置 toolbutton 的 dropdownmenu 为 popupmenu,设置其 style 为 btsdropdown但是这种方法做出来的菜单其实和你要求的并不一样。它的菜单其实是受在按钮旁边的 一个小三角符号控制的。看第二种方法:1 放一个 coolbar2在其上放两个toolbar3在你想做成菜单的那个tool
2、bar上放一个speedbotton4 设置 speedbutton 的 flat 为 true, caption 为“文件”5加如一个popupmenu,设置其items为“打开”和“退出”6在speedbutton的onclick事件里加入以下代码:void _fastcall TForm1:SpeedButton1(TObejct *Sender)Tpoint Pos;TSpeedButton *Btn;Btn = TSpeedButton(Sender);Pos=Btn.ClientToScreen(TPoint(0,0);Pos.y=Pos.y+Btn.Height;PopupMen
3、u1.Popup(Pos.x,Pos.y);第三种方法:不需要写代码。步骤:1、在窗口加一个 TControlBar2、在 TControlBar 上加一个 TToolBar3、在TToolBar上加足够的按钮(右键菜单的那种),你希望有多少项菜单就加多少个按 钮。4、加一个TMainMenu,象你希望的一样添加菜单项。5、去掉窗口的Menu属性中的值(在属性窗口中)6、设 TToolBar 属性:ShowCaption=trueDragKind=dkDockDragMode=dmAutomaticFlat=trueEdgeBorder=去掉所有项7、对TToolBar中的所有按钮的设属性:Grouped=trueAutoSize=trueMenuItem=希望按钮对应的菜单项然后,一切OK!