OraFormsMouseClick Function

Action

OraFormsMouseClick can be used to simulate a single mouse click on a control or form window.

Include

OraForms.bdh

Syntax

OraFormsMouseClick(  in sName :  string,  
                     in nX    :  number, 
                     in nY    :  number, 
                     in nMod  :  number optional ) :  boolean;

Return value

  • true if successful
  • false otherwise
Parameter Description
sName Unique name of the control or window on which the mouse click should occur.
nX X-Coordinate of the mouse click.
nY Y-Coordinate of the mouse click.
nMod

(optional):

This parameter can be used to define a key modifier. A key modifier is a special key that is additionally pressed when the mouse button is clicked. The following constants are available:

  • ORA_SKEY_ALTGR
  • ORA_SKEY_SHIFT
  • ORA_SKEY_CTRL
  • ORA_SKEY_META
  • ORA_SKEY_ALT

If no modifier should be used, pass 0 for this parameter.

Example

transaction TMain 
  var 
    sValue :  string; 
    nFetched :  number; 
  begin 
    OraFormsSetConnectMode(ORA_SOCKET_CONNECTION); 
    // Connect - with connection properties 
    OraFormsSetInt( "INITIAL_VERSION", 608); 
    OraFormsSetPoint( "INITIAL_RESOLUTION", 96,  96); 
    OraFormsSetPoint( "INITIAL_DISP_SIZE", 1024,  768); 
    OraFormsSetInt( "INITIAL_COLOR_DEPTH", 256); 
    OraFormsSetString( "FONT_NAME" , "Dialog" ); 
    OraFormsSetPoint( "INITIAL_SCALE_INFO", 8,  18); 
    OraFormsSetBoolean( "WINSYS_REQUIREDVA_LIST",  false); 
    OraFormsConnect( "server module=Person3.fmx userid= useSDI=yes record=names"); 
    // --- 
    // New window activated: WINDOW1 
    OraFormsSetWindow( "WINDOW1"); 
    OraFormsMouseClick( "TREE_BLK_PROD_TREE_0",  65,  125,  0); 
    OraFormsMouseDblClick( "TREE_BLK_PROD_TREE_0",  65,  125,  0); 

    OraFormsMenuItem( "WINDOW1",  "Action::Exit"); 
  end  TMain;