调用MeasureItem过程(TMenuItem，Delphi)

Question

我有这个程序，它是一个TMenuItem事件(混合- OnMeasureItem)。它正常工作。

MeasureItem(Sender: TObject; ACanvas: TCanvas; var Width, Height: Integer);

我想在FormResize事件中调用它，但是我收到了“实际参数不够”的消息。

你能帮我怎样才能正确称呼它？

Answer 1

“没有足够的实际参数”意味着您没有提供它所期望的所有参数。该方法需要四个参数。第一个应该是对正在测量的菜单项的引用，第二个应该是包含用于绘制菜单的属性的画布，如果菜单是真正绘制的，那么其余的参数应该是接收请求的菜单项大小的变量。

这就是如何调用该方法。是否应该调用该方法完全是另一回事。如果你需要的话，我邀请你发表另一个关于这个话题的问题。