OraFormsKeyStroke Function

Action

OraFormsKeyStroke sends a special key to the server (e.g., a tab key).

Include file

OraForms.bdh

Syntax

OraFormsEditSet(  in sName :  string,  
                  in nChar :  number,
                  in nMod  :  number ) :  boolean;

Return value

  • true if successful
  • false otherwise
Parameter Description
sName The unique name of the control where the special key is pressed.
nChar The ascii code of the special key that should be pressed. There are some constants that can be used for the most common special keys:
  • ORA_KEY_TAB
  • ORA_KEY_ENTER
  • ORA_KEY_PAGEUP
  • ORA_KEY_PAGEDOWN
  • ORA_KEY_LINEUP
  • ORA_KEY_LINEDOWN
nMod This parameter can be used to define a key modifier. A key modifier is a special key that is additionally pressed when pressing a special key. 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

dcltrans
  transaction TMain 
  var 
    sValue :  string; 
  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"); 
    OraFormsSetWindow( "Logon"); 
    OraFormsLogon( "user",  "password",  "orcl_server"); 
    // --- 
    // New window activated: WINDOW1 
    OraFormsSetWindow( "WINDOW1"); 
    OraFormsEditSet( "PERSON_FIRST_NAME", "Andi"); 
    OraFormsKeyStroke( "PERSON_FIRST_NAME", ORA_KEY_TAB,  0); 
    OraFormsEditSet( "PERSON_LAST_NAME", "GRABNER", ORA_EDIT_SEND_DIRTY,  "Reithmayr"); 
    OraFormsMenuItem( "WINDOW1",  "Action::Exit"); 
  end TMain;