PopupMenu 怎么改变弹出框的尺寸大小 BCB

PopupMenu 如何改变弹出框的尺寸大小 BCB
如题，当我点击并弹出PopupMenu的对话框时，感觉对话框尺寸有点大，想将width、height同时减小，有什么办法呢？需要重绘吗？各位大神多多帮助啊！

[解决办法]
设置PopupMenu的OwnerDraw为true，然后在每个MenuItem的OnMeasureItem事件中修改Height和Width的值。