OraFormsSetRectangle Function

Action

Sets a rectangle property that must be sent with the next request.

Include file

OraForms.bdh

Syntax

OraFormsSetRectangle( in sProperty : string,
                      in nX0       : number,
                      in nY0       : number,
                      in nX1       : number,
                      in nY1       : number,
                      in nFlag     : number optional );
Parameter Description
sProperty The property name.
nX0 The x part of the first coordinates.
nY0 The y part of the first coordinates.
nX1 The x part of the second coordinates.
nY1 The y part of the second coordinates.
nFlag

The type of function that will send the property Possible values:

  • ORA_SET_TYPE_NORMAL (default)

  • ORA_SET_TYPE_MESSAGEGET, which is currently only used for the OraFormsOnMessageGet function.

Example

dcltrans
   transaction TMain
    OraFormsSetInt("INITIAL_VERSION", 90290); 
    OraFormsSetPoint("INITIAL_RESOLUTION", 96, 96);
    OraFormsSetPoint("INITIAL_DISP_SIZE", 1024, 768);
    OraFormsSetInt("INITIAL_COLOR_DEPTH", 256);
    OraFormsSetInt("WINSYS_COLOR_ADD", 0);
    OraFormsSetInt("WINSYS_COLOR_ADD", 255);
    OraFormsSetInt("WINSYS_COLOR_ADD", 65535);
    OraFormsSetInt("WINSYS_COLOR_ADD", 4210752);
    OraFormsSetInt("WINSYS_COLOR_ADD", 8421504);
    OraFormsSetInt("WINSYS_COLOR_ADD", 65280);
    OraFormsSetInt("WINSYS_COLOR_ADD", 12632256);
    OraFormsSetInt("WINSYS_COLOR_ADD", 16711935);
    OraFormsSetInt("WINSYS_COLOR_ADD", 16762880);
    OraFormsSetInt("WINSYS_COLOR_ADD", 16756655);
    OraFormsSetInt("WINSYS_COLOR_ADD", 16711680);
    OraFormsSetInt("WINSYS_COLOR_ADD", 16777215);
    OraFormsSetInt("WINSYS_COLOR_ADD", 16776960);
    OraFormsSetString("FONT_NAME", "Dialog");
    OraFormsSetInt("FONT_SIZE", 900);
    OraFormsSetByte("FONT_STYLE", 0);
    OraFormsSetPoint("INITIAL_SCALE_INFO", 8, 20);
    OraFormsSetBoolean("WINSYS_REQUIREDVA_LIST", false);
    OraFormsSetString("DEFAULT_LOCAL_TZ", "Europe/Berlin");
    OraFormsSetRectangle("INIITAL_SCREENSIZE", 0, 0, 1024, 768);
    OraFormsConnect( "server module=c:\\orant\\forms90\\EDITCOMBO.fmx usesdi=yes userid= sso_userid=");
  end TMain;