![]() | Programming Guide | WideStudio Index Table of contents |
在对象中设置新的事件过程
通过mpfc::WSCbase_addProcedure()成员函数,在对象中设置新的事件过程。按照如下步骤生成事件过程对象。
添加事件过程的成员函数 功能 mpfc::WSCbase_addProcedure(char*,char*,long) 添加新的事件过程 use mpfc; # 新建的事件过程函数 sub _new_event_procedure { my ($object) = @_; return; } sub event_procedure { my ($object) = @_; # 生成名为"new proc"的事件过程 # 触发器为WSEV_MOUSE_IN (MOUSE_IN 触发器) mpfc::WSCbase_addProcedure($object,"new proc","_new_event_procedure",$mpfc::WSEV_MOUSE_IN); return; } 1;
Copyright(C) T. Hirabayashi, 2000-2004 | Last modified: Feb 25, 2004 |