通知易系统产生组件事件

晚风与酒

  

子程序名	返回值类型	公开	备 注
通知系统产生事件_方式1	整数型		以第一类方式通知系统产生了组件事件,返回0表示用户未定义指定事件代码,否则返回非0值
参数名	类 型	参考	可空	数组	备 注
EventNotifyData	事件通知结构1

变量名	类 型	静态	数组	备 注
事件	整数型

置入代码 ({ 139, 69, 8, 139, 0, 137, 69, 252 })
返回 (调用易系统功能 (2008, 事件, 0))

子程序名	返回值类型	公开	备 注
通知系统产生无参数无返回的事件	整数型		通知系统产生了一个无参数无返回值的组件事件
参数名	类 型	参考	可空	数组	备 注
父窗口易ID	整数型				父窗口ID
组件易ID	整数型				组件ID
事件索引	整数型				事件索引，从0开始。

变量名	类 型	静态	数组	备 注
事件	事件通知结构1

事件.父窗口易ID ＝ 父窗口易ID
事件.组件易ID ＝ 组件易ID
事件.事件索引 ＝ 事件索引
返回 (通知系统产生事件_方式1 (事件))

子程序名	返回值类型	公开	备 注
通知系统产生无参数无返回的组件事件	整数型
参数名	类 型	参考	可空	数组	备 注
组件对象	通用型
组件事件索引	整数型

变量名	类 型	静态	数组	备 注
窗口ID	整数型
组件ID	整数型
事件索引	整数型

' 由于易系统在传入组件类型的参数时会同时把窗口ID与组件ID压入栈中，原参数表所对应的值会发生错乱，使用下列代码重新获取对应的值
置入代码 ({ 139, 69, 8, 137, 69, 252, 139, 69, 12, 137, 69, 248, 139, 69, 16, 137, 69, 244 })
返回 (通知系统产生无参数无返回的事件 (窗口ID, 组件ID, 事件索引))

数据类型名	公开	备 注
事件通知结构1		大小:44 事件通知结构 不支持参数为长整数、双精度小数、日期时间型的事件
成员名	类 型	传址	数组	备 注
父窗口易ID	整数型			父窗口ID
组件易ID	整数型			组件ID
事件索引	整数型			事件索引
参数数目	整数型			参数数目,最多5个，以下为各参数值
参数1	整数型			各参数值只能为变量地址或长度不超过4字节的数据
参数2	整数型			逻辑型用 1 或 0 表示
参数3	整数型
参数4	整数型
参数5	整数型
是否有返回值	逻辑型			是否提供了返回值
返回值	整数型			事件返回值

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 通知系统产生事件_方式1, 整数型, 公开, 以第一类方式通知系统产生了组件事件,返回0表示用户未定义指定事件代码,否则返回非0值<br /> .参数 EventNotifyData, 事件通知结构1, 参考<br /> .局部变量 事件, 整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 0, 137, 69, 252 })<br /> 返回 (调用易系统功能 (2008, 事件, 0))<br /> <br /> .子程序 通知系统产生无参数无返回的事件, 整数型, 公开, 通知系统产生了一个无参数无返回值的组件事件<br /> .参数 父窗口易ID, 整数型, , 父窗口ID<br /> .参数 组件易ID, 整数型, , 组件ID<br /> .参数 事件索引, 整数型, 可空, 事件索引，从0开始。<br /> .局部变量 事件, 事件通知结构1<br /> <br /> 事件.父窗口易ID ＝ 父窗口易ID<br /> 事件.组件易ID ＝ 组件易ID<br /> 事件.事件索引 ＝ 事件索引<br /> 返回 (通知系统产生事件_方式1 (事件))<br /> <br /> .子程序 通知系统产生无参数无返回的组件事件, 整数型<br /> .参数 组件对象, 通用型<br /> .参数 组件事件索引, 整数型<br /> .局部变量 窗口ID, 整数型<br /> .局部变量 组件ID, 整数型<br /> .局部变量 事件索引, 整数型<br /> <br /> ' 由于易系统在传入组件类型的参数时会同时把窗口ID与组件ID压入栈中，原参数表所对应的值会发生错乱，使用下列代码重新获取对应的值<br /> 置入代码 ({ 139, 69, 8, 137, 69, 252, 139, 69, 12, 137, 69, 248, 139, 69, 16, 137, 69, 244 })<br /> 返回 (通知系统产生无参数无返回的事件 (窗口ID, 组件ID, 事件索引))<br /> .版本 2<br /> <br /> .数据类型 事件通知结构1, 公开, 大小:44 事件通知结构 不支持参数为长整数、双精度小数、日期时间型的事件<br />     .成员 父窗口易ID, 整数型, , , 父窗口ID<br />     .成员 组件易ID, 整数型, , , 组件ID<br />     .成员 事件索引, 整数型, , , 事件索引<br />     .成员 参数数目, 整数型, , , 参数数目,最多5个，以下为各参数值<br />     .成员 参数1, 整数型, , , 各参数值只能为变量地址或长度不超过4字节的数据<br />     .成员 参数2, 整数型, , , 逻辑型用 1 或 0 表示<br />     .成员 参数3, 整数型<br />     .成员 参数4, 整数型<br />     .成员 参数5, 整数型<br />     .成员 是否有返回值, 逻辑型, , , 是否提供了返回值<br />     .成员 返回值, 整数型, , , 事件返回值

参考使用了支持库开发过程中的NotifySys()函数调用易系统功能，他的平替是特殊功能支持库里的 调用易系统功能()。

本贴的例子适用于使用了事件转移()的代码,保存了组件的变量，在变量上直接修改值不会触发对应的事件。理论上支持所有易开发组件

使用方法

  

通知系统产生无参数无返回的组件事件 (_启动窗口, 1)

通知系统产生无参数无返回的组件事件 (_启动窗口, 1)

窗口组件事件

事件索引至上到下，从0开始。到分割线结束

为什么会选择这个函数，而不使用发送消息。因为在组件是选择框时，发送消息事件是触发了，但会改变原来的选中状态，而使用此函数不会改变任何状态。


如果事件带有参数或者返回值，可以修改事件通知结构里的成员来达到效果

awuming

本贴的例子适用于使用了事件转移()的代码,保存了组件的变量，在变量上直接修改值不会触发对应的事件。理论上支持所有易开发组件

wh1234567

感谢分享