怎样是某项菜单靠右对齐?(100分)

  • 主题发起人 主题发起人 rychu
  • 开始时间 开始时间
R

rychu

Unregistered / Unconfirmed
GUEST, unregistred user!
就像有些软件的"Help"菜单是在窗体右边的那种效果。
 
你应该使用ModifyMenu函数 :
BOOL ModifyMenu(HMENU hMnu,UINT uPosition,UINT uFlags,UINT uIDNewItem, LPCTSTR lpNewItem);
第一个参数h M e n u指的是要修改菜单的句柄;第二个参数u P o s i t i o n指的是要修改的菜单项
索引,其值从零开始到菜单项的总数减一;第三个参数u F l a g s指的是新菜单项的状态;第四个
参数u I D N e w I t e m是指新菜单的句柄;第五个参数l p N e w I t e m指的是修改后菜单的标题。
如果设置第四个参数为新菜单的句柄,程序运行时就会把菜单项改成重新设计的模式。
给你做了一个小程序,你可以明白的 :
1) 通过File | New Application创建一个新工程。
2) 在窗体F o r m 1中添加M a i n M e n u组件,通过右键弹出式菜单的Menu Designer命令设计一个
简单的菜单,包括两个菜单项,其C a p t i o n属性分别设置为& F i l e和& H e l p。
3) 在F o r m 1的O n C r e a t e事件的处理过程中添加以下代码:
procedure TForm1.Form1Create(Sender: TO b j e c t )
b e g i n
// mf_Help参数决定菜单项位于窗口的最右端
ModifyMenu(MainMenu1.Handle,1,mf_BYPosition ormf_Popup or mf_Help,Help1.Handle,'帮助( & H ) ' )
end;
 
您怎么知道mf_Help这个标志的?ModifyMenu的帮助里没有这个东西的。
 
可以结束了。
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
829
SUNSTONE的Delphi笔记
S
后退
顶部