OraFormsSetByteArray Function

Action

Sets a byte array that must be sent with the next request.

Include file

OraForms.bdh

Syntax

OraFormsSetByteArray( in sPropertry : string,
                      in byteArray  : array of number,
                      in nLen       : number,
                      in nFlag      : number optional );
Parameter Description
sProperty The property name.
byteArray The property value.
nLen The length of the array.
nFlag

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

  • ORA_SET_TYPE_NORMAL (default)

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

Example

dcltrans
  transaction TMain
  var    nArray : array of number init 1, 2, 3, 4, 5;  begin
    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");    OraFormsSetByteArray("KEYBINDING", nArray, 5);   
    OraFormsConnect( "server module=c:\\orant\\forms90\\EDITCOMBO.fmx usesdi=yes userid= sso_userid=");
  end TMain;