动态创建Form

static void CreateFieldMethod(Args _args)
{
 3     TreeNode       tn1, tnAddr, methodsNode;
    MemberFunction memberFunction;
    str            source;
    ;
 
    tn1         = infolog.findNode("\\Forms\\Address\\Data Sources\\Address\\Fields\\AddrRecId");
    tnAddr      = infolog.findNode( "\\Forms\\Address" );
    methodsNode = tn1.AOTfindChild( 'Methods' );
    methodsNode.AOTadd('lookup');
    memberFunction = methodsNode.AOTfindChild( 'lookup' );
    source = @"public void lookup(FormControl _formControl, str _filterStr)
    {
    　　super(_formControl, _filterStr);
    }" ;
    memberFunction.AOTsetSource(source, false);
    memberFunction.AOTsave();
    methodsNode.AOTsave();
    tnAddr.AOTcompile();
}