OraFormsMouseClick can be used to simulate a single mouse click on a control or form window.
OraForms.bdh
OraFormsMouseClick( in sName : string, in nX : number, in nY : number, in nMod : number optional ) : boolean;
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:
If no modifier should be used, pass 0 for this parameter. |
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;