OraFormsCloseDialog closes an active dialog that is identified by its unique name or ID. A standard dialog can be closed by clicking either the OK or CANCEL button, where two different constant values can be used to indicate which button is to be used to close the dialog.
OraForms.bdh
OraFormsCloseDialog( in sName : string, in nButton : number ) : boolean;
Parameter | Description |
---|---|
sName | The unique name of the dialog window that is to be closed. |
nButton | The button that is to be pressed to close the dialog:
|
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"); OraFormsMenuItem( "WINDOW1", "Action::Calculator"); // --- // New window activated: CALC_PROMPT OraFormsSetWindow( "CALC_PROMPT"); OraFormsCloseDialog( "CALC_PROMPT", ORA_DIALOG_OK); // --- // New window activated: WINDOW1 OraFormsSetWindow( "WINDOW1"); OraFormsMenuItem( "WINDOW1", "Action::Exit"); end TMain;