hongji.li
2023-11-11 df5a7e1ad6835e78b2f9eb7428817b0c23b116bc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
Quintiq file version 2.0
#parent: #root
Method CreateObjects (
  NamedValue nv,
  shadow[LibOpt_UIOwner] owner,
  String prefix,
  NamedValueTree nvt,
  structured[shadow[LibOpt_BT_UISetting]] existing
) id:Method_FormSettings_CreateObjects
{
  #keys: '[139544.1.1263142282]'
  Body:
  [*
    children := nv.Children();
    
    name := nv.Name();
    if( prefix <> '' )
    {
      name := prefix + '.' + name;
    }
    
    if( name <> '' and LibOpt_Utility::IsSettingsNode( nv ) )
    {
      // Try repurposing an exinsting setting object.
      setting := select( existing, Elements, elem, elem.Path() = name );
      if( isnull( setting ) )
      {
        setting := owner.UISetting( relnew, Path := name );
      }
      else
      {
        existing.Remove( setting );
      }
      setting.ValueRepresentation( this.GetValueRepresentation( nv ) );
      definedby_node := guard( nv.Child( nvt.GetHandle( LibSE_SettingsContainer::Handle_Metadata() ) )
                                 .Child( nvt.GetHandle( LibSE_SettingsContainer::Handle_DefinedBy() ) ),
                               null( NamedValue ) );
      if( not isnull( definedby_node ) )
      {
        setting.DefinedBy( definedby_node.GetValueAsString() );
      }
    }
    else
    {
      traverse( children, Elements, child )
      {
        this.CreateObjects( child, owner, name, nvt, existing );
      }
    }
  *]
}