delphi - TStringGrid列调整大小事件？

Question

TStringGrid具有一个TGridOption goColSizing，当您在列之间的空白处拖动时，该控件可在运行时自动调整列的大小。列大小发生时是否触发相应的事件？如果列大小发生变化，我想调整另一个组件的大小以匹配特定列的大小/位置。

Answer 1

据我所知，没有任何事件可以通知您这种修改。我认为您最好的办法是对控件进行子类化并覆盖ColWidthsChanged方法：


列宽更改时响应。

列宽更改后，立即调用ColWidthsChanged。可以通过设置ColWidths属性，设置DefaultColWidth属性，移动列之一或使用鼠标调整列大小来进行更改。


由于对控件进行子类化是一项非常繁重的操作，因此明智的做法是仅对子类进行一次子类化并重写此方法以显示事件。