读书人

怎么改变popupMenu中分割线所占的高度

发布时间: 2012-03-22 17:43:57 作者: rapoo

如何改变popupMenu中分割线所占的高度呢,如图所示!
如何改变popupMenu中分割线所占的高度呢,如图所示!

这是delphi的弹出菜单的分割线默认的高度


这是我想实现的效果



如何才能实现呢?

[解决办法]
每个菜单项有MesureItem事件
[解决办法]

Delphi(Pascal) code
procedure TForm1.N1MeasureItem(Sender: TObject; ACanvas: TCanvas;  var Width, Height: Integer);beginend;
[解决办法]
探讨
Delphi(Pascal) code

procedure TForm1.N1MeasureItem(Sender: TObject; ACanvas: TCanvas;
var Width, Height: Integer);
begin

end;
bdmh
的意思应该是设置这里的var Width, Height: Integer);

[解决办法]
菜单的OwnerDraw设置为true,然后在你想控制的Item的MeasureItem事件中写下Height := xxxx;

读书人网 >.NET

热点推荐