我在表单上有一个ADODStoredProc。它在代码中,不是可视的。通常,如果一个组件是可视的,处理事件就很容易。只需要双击所需的事件即可。但是,如何用代码实现呢?我声明了一个过程:
procedure SP_SearchAfterScroll(DataSet:TDataSet)
现在我该如何将SP_Search(这是ADOStoredProc)的AfterScroll事件处理程序属性分配给我上面编写的过程。我相信你会回答它。提前致谢。
我在表单上有一个ADODStoredProc。它在代码中,不是可视的。通常,如果一个组件是可视的,处理事件就很容易。只需要双击所需的事件即可。但是,如何用代码实现呢?我声明了一个过程:
procedure SP_SearchAfterScroll(DataSet:TDataSet)
当SP_Search是TAdoStoredProc,并且具有OnAfterScroll属性时,你需要做的就是:
SP_Search.OnAfterScroll := SP_SearchAfterScroll;
我假设你使用了正确的SP_SearchAfterScroll签名。也就是说,OnAfterScroll属性的类型应该如下所示:
TScrollEvent = procedure(DataSet: TDataSet) of object;
如果OnAfterScroll属性的类型与此不同,您需要确保您的SP_SearchAfterScroll过程与该类型中的参数匹配。声明如下:
TDataSetNotifyEvent