Page History
Description
Allows you to enable, disable, or modify event processing for the specified control. In addition, it supports the qualifying of any Windows message.
...
To request that OLE messages be sentfo to the OLE event.
Applies to
All controls
Syntax
Code Block |
---|
eventspecifier = Send_Message(controlID, "QUALIFY_EVENT", eventname, eventprocessing) |
...
Code Block |
---|
request = Send_Message(CtrlEntID, "QUALIFY_EVENT", uMsg, bRequest) |
Parameters
Parameters are as follows.
...
Code Block |
---|
"2*SYSPROG*CLICK*MY_MSG.OK" |
Returns
The current event specifier.
See also
EVENTQUALIFIER property, WINMSG event, OLE event
Example
Code Block |
---|
/* this example disables the click event for the "OK" button; note that the return value is in for form "1": @fm: Qualifier, which is the format that is passed to QUALIFY_EVENT to re-enable the event. */ Qualifier = Send_Message(@window: ".OK", "QUALIFY_EVENT", "CLICK", 0) * re-enable the click event for the "OK" button Send_Message (@window: ".OK", "QUALIFY_EVENT", "CLICK", Qualifier) /* this example changes the click event for the "OK" button to call the window's OMNIEVENT instead. */ Qualifier = 1: @fm: 2: "*": @appid<1>: "*OMNIEVENT*": @WINDOW: "." Send_Message(@window: ".OK", "QUALIFY_EVENT", "CLICK", Qualifier) * The following code will QUALIFY the Right mouse click on editlines and edittables * Qualify the Right Mouse click in an Edit table retval = Send_Message(@window:'.TABLE_1', 'QUALIFY_EVENT', '0x7b', 1) * Qualify the Right Mouse click in an Edit line retval = Send_Message(@window: ".EDITLINE_1', 'QUALIFY_EVENT', '0x206',1) * Handle the WINMSG Event for an Edit table if message = 123 then *** Your process end * Handle the WINMSG Event for an Edit line if message = 516 then *** Your process end |
...