OraFormsParseSelectedTreeItem Function

Action

Returns the value of the selected tree node.

Include file

OraForms.bdh

Syntax

OraFormsParseSelectedTreeItem( in sName : string ) : string;

Return value

  • The string representation of the selected tree node.

  • NULL otherwise

Parameter Description
sName The tree control’s unique name.

Example

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");
    
    // New window activated: Logon
    OraFormsSetWindow("Logon");
    OraFormsLogon("user", "password", "orcl_server");
    
    // ---
    // New window activated: WINDOW1
    OraFormsSetWindow("WINDOW1");
    OraFormsMenuItem("WINDOW1", "Query::Execute Query");
    sValue := OraFormsParseSelectedTreeItem("TREE_CONTROL");
    if StrIsNull(sValue) then
    Print("sValue is null");
  end;
    OraFormsMenuItem("WINDOW1",
    "Action::Exit");
  end TMain;