Object

    Procedure OnCreateTree
        Forward Send OnCreateTree
        // ToDo: Set Tree view here...
    End_Procedure

End_Object