挂钩Delphi TReader.OnFindComponentClass

时间:2018-12-27 10:28:46

标签: delphi vcl tlabel

一个人如何利用TReader.OnFindComponentClassTReader的创建是硬编码在TStream.ReadComponent中的。我看不到一个可以挂起事件的地方。

TStream.ReadComponent不是虚拟的。即使是这样,即使必须派生TStream,也可以直接派生TReader,而OnFindComponentClass并没有太大用处。我认为这一定是挂断事件的简便方法,否则,即使没有意义也必须这样做。但我无法识别。

我问的原因是@DavidHeffernan的回答:
TLabel displays accelerator keys even when the UI state says not to

  

我通过将表单流传输机制与TUIStateAwareLabel挂钩来确保始终创建TLabel而不是TReader.OnFindComponentClass

0 个答案:

没有答案