GuiInstanceLoader

#include "GuiInstanceLoader_TemplateControl.h"

#ifndef VCZH_DEBUG_NO_REFLECTION

namespace

{

namespace

presentation

{

namespace

instance_loaders

{

template

typename

TItemTemplateStyle

Ptr

WfStatement

CreateSetControlTemplateStyle

(

types

ResolvingResult

resolvingResult

GlobalStringKey

variableName

Ptr

WfExpression

argument

const

WString

propertyName

) {

auto

createStyle

MakePtr

WfNewClassExpression

>();

createStyle

type

GetTypeFromTypeInfo

(

TypeInfoRetriver

Ptr

TItemTemplateStyle

>>::

CreateTypeInfo

().

Obj

());

createStyle

arguments

Add

(

argument

);

auto

refControl

MakePtr

WfReferenceExpression

>();

refControl

name

value

variableName

ToString

();

auto

refStyleProvider

MakePtr

WfMemberExpression

>();

refStyleProvider

parent

refControl

;

refStyleProvider

name

value

propertyName

;

auto

assign

MakePtr

WfBinaryExpression

>();

assign

WfBinaryOperator

Assign

;

assign

first

refStyleProvider

;

assign

second

createStyle

;

auto

stat

MakePtr

WfExpressionStatement

>();

stat

expression

assign

;

return

stat

; }

/*********************************************************************** GuiComboBoxInstanceLoader ***********************************************************************/

#define BASE_TYPE GuiTemplateControlInstanceLoader<GuiComboBoxListControl>

class GuiComboBoxInstanceLoader : public BASE_TYPE

class

GuiComboBoxInstanceLoader

public

GuiTemplateControlInstanceLoader

GuiComboBoxListControl

{

protected

GlobalStringKey

_ListControl

;

void

AddAdditionalArguments

(

types

ResolvingResult

resolvingResult

const

TypeInfo

typeInfo

GlobalStringKey

variableName

ArgumentMap

arguments

GuiResourceError

List

errors

Ptr

WfNewClassExpression

createControl

)

override

{

vint

indexListControl

arguments

Keys

().

IndexOf

(

_ListControl

);

(

indexListControl

!= -

) {

createControl

arguments

Add

(

arguments

GetByIndex

(

indexListControl

)

[

expression

); } }

public

GuiComboBoxInstanceLoader

()

:BASE_TYPE(L"presentation::controls::GuiComboBox", theme::ThemeName::ComboBox)

GuiTemplateControlInstanceLoader

GuiComboBoxListControl

L"presentation::controls::GuiComboBox"

theme

ThemeName

ComboBox

)

{

_ListControl

GlobalStringKey

Get

(

L"ListControl"

); }

void

GetRequiredPropertyNames

(

const

TypeInfo

typeInfo

collections

List

GlobalStringKey

propertyNames

)

override

{

(

CanCreate

(

typeInfo

)) {

propertyNames

Add

(

_ListControl

); }

BASE_TYPE::GetRequiredPropertyNames(typeInfo, propertyNames);

GuiTemplateControlInstanceLoader

GuiComboBoxListControl

>::

GetRequiredPropertyNames

(

typeInfo

propertyNames

);

}

void

GetPropertyNames

(

const

TypeInfo

typeInfo

collections

List

GlobalStringKey

propertyNames

)

override

{

GetRequiredPropertyNames

(

typeInfo

propertyNames

);

BASE_TYPE::GetPropertyNames(typeInfo, propertyNames);

GuiTemplateControlInstanceLoader

GuiComboBoxListControl

>::

GetPropertyNames

(

typeInfo

propertyNames

);

}

Ptr

GuiInstancePropertyInfo

GetPropertyType

(

const

PropertyInfo

propertyInfo

)

override

{

(

propertyInfo

propertyName

_ListControl

) {

auto

info

GuiInstancePropertyInfo

Assign

(

TypeInfoRetriver

GuiSelectableListControl

*>::

CreateTypeInfo

());

info

usage

GuiInstancePropertyInfo

ConstructorArgument

;

return

info

; }

return BASE_TYPE::GetPropertyType(propertyInfo);

return

GuiTemplateControlInstanceLoader

GuiComboBoxListControl

>::

GetPropertyType

(

propertyInfo

);

} };

#undef BASE_TYPE

/*********************************************************************** GuiTreeViewInstanceLoader ***********************************************************************/

#define BASE_TYPE GuiTemplateControlInstanceLoader<TControl>

template

typename

TControl

class GuiTreeViewInstanceLoaderBase : public BASE_TYPE

class

GuiTreeViewInstanceLoaderBase

public

GuiTemplateControlInstanceLoader

TControl

{

protected

bool

bindable

;

GlobalStringKey

_Nodes

;

public

GuiTreeViewInstanceLoaderBase

(

bool

_bindable

)

:BASE_TYPE(description::TypeInfo<TControl>::content.typeName, theme::ThemeName::TreeView)

GuiTemplateControlInstanceLoader

TControl

description

TypeInfo

TControl

>::

content

.typeName,

theme

ThemeName

TreeView

)

, bindable(

_bindable

) {

_Nodes

GlobalStringKey

Get

(

L"Nodes"

); }

void GetPropertyNames(const typename BASE_TYPE::TypeInfo& typeInfo, collections::List<GlobalStringKey>& propertyNames)override

void

GetPropertyNames

(

const

typename

GuiTemplateControlInstanceLoader

TControl

>::

TypeInfo

typeInfo

collections

List

GlobalStringKey

propertyNames

)

override

{

bindable

) {

propertyNames

Add

(

_Nodes

); }

BASE_TYPE::GetPropertyNames(typeInfo, propertyNames);

GuiTemplateControlInstanceLoader

TControl

>::

GetPropertyNames

(

typeInfo

propertyNames

);

}

Ptr<GuiInstancePropertyInfo> GetPropertyType(const typename BASE_TYPE::PropertyInfo& propertyInfo)override

Ptr

GuiInstancePropertyInfo

GetPropertyType

(

const

typename

GuiTemplateControlInstanceLoader

TControl

>::

PropertyInfo

propertyInfo

)

override

{

(

propertyInfo

propertyName

_Nodes

) {

bindable

) {

return

GuiInstancePropertyInfo

Collection

(

TypeInfoRetriver

Ptr

tree

MemoryNodeProvider

>>::

CreateTypeInfo

()); } }

return BASE_TYPE::GetPropertyType(propertyInfo);

return

GuiTemplateControlInstanceLoader

TControl

>::

GetPropertyType

(

propertyInfo

);

}

Ptr<workflow::WfStatement> AssignParameters(GuiResourcePrecompileContext& precompileContext, types::ResolvingResult& resolvingResult, const typename BASE_TYPE::TypeInfo& typeInfo, GlobalStringKey variableName, typename BASE_TYPE::ArgumentMap& arguments, GuiResourceTextPos attPosition, GuiResourceError::List& errors)override

Ptr

workflow

WfStatement

AssignParameters

(

GuiResourcePrecompileContext

precompileContext

types

ResolvingResult

resolvingResult

const

typename

GuiTemplateControlInstanceLoader

TControl

>::

TypeInfo

typeInfo

GlobalStringKey

variableName

typename

GuiTemplateControlInstanceLoader

TControl

>::

ArgumentMap

arguments

GuiResourceTextPos

attPosition

GuiResourceError

List

errors

)

override

{

auto

block

MakePtr

WfBlockStatement

>();

FOREACH_INDEXER(GlobalStringKey, prop, index, arguments.Keys())

(

bool

__scope_variable_flag__

true

)

for

(

const

collections

ForEachIterator

GlobalStringKey

__foreach_iterator__

= ::

collections

CreateForEachIterator

(

arguments

Keys

());

__scope_variable_flag__

;

__scope_variable_flag__

false

)

(

bool

__scope_variable_flag__

true

)

for

(

vint

index

;

__scope_variable_flag__

;

__scope_variable_flag__

false

)

for

(

GlobalStringKey

prop

;

__foreach_iterator__

(

prop

);

index

++)

{

(

prop

_Nodes

) {

auto

refControl

MakePtr

WfReferenceExpression

>();

refControl

name

value

variableName

ToString

();

auto

refNodes

MakePtr

WfMemberExpression

>();

refNodes

parent

refControl

;

refNodes

name

value

L"Nodes"

;

auto

refChildren

MakePtr

WfMemberExpression

>();

refChildren

parent

refNodes

;

refChildren

name

value

L"Children"

;

auto

refAdd

MakePtr

WfMemberExpression

>();

refAdd

parent

refChildren

;

refAdd

name

value

L"Add"

;

auto

call

MakePtr

WfCallExpression

>();

call

function

refAdd

;

call

arguments

Add

(

arguments

GetByIndex

(

index

)

[

expression

);

auto

stat

MakePtr

WfExpressionStatement

>();

stat

expression

call

;

block

statements

Add

(

stat

); } }

(

block

statements

Count

() >

) {

return

block

; }

return BASE_TYPE::AssignParameters(precompileContext, resolvingResult, typeInfo, variableName, arguments, attPosition, errors);

return

GuiTemplateControlInstanceLoader

TControl

>::

AssignParameters

(

precompileContext

resolvingResult

typeInfo

variableName

arguments

attPosition

errors

);

} };

#undef BASE_TYPE

class

GuiTreeViewInstanceLoader

public

GuiTreeViewInstanceLoaderBase

GuiTreeView

> {

public

GuiTreeViewInstanceLoader

() :

GuiTreeViewInstanceLoaderBase

GuiTreeView

false

) { } };

class

GuiBindableTreeViewInstanceLoader

public

GuiTreeViewInstanceLoaderBase

GuiBindableTreeView

> {

public

GuiBindableTreeViewInstanceLoader

() :

GuiTreeViewInstanceLoaderBase

GuiBindableTreeView

true

) { } };

/*********************************************************************** GuiTreeNodeInstanceLoader ***********************************************************************/

class

GuiTreeNodeInstanceLoader

public

Object

public

IGuiInstanceLoader

{

protected

GlobalStringKey

typeName

;

GlobalStringKey

_Text

_Image

_Tag

;

public

GuiTreeNodeInstanceLoader

() :typeName(

GlobalStringKey

Get

(

L"presentation::controls::tree::TreeNode"

)) {

_Text

GlobalStringKey

Get

(

L"Text"

);

_Image

GlobalStringKey

Get

(

L"Image"

);

_Tag

GlobalStringKey

Get

(

L"Tag"

); }

GlobalStringKey

GetTypeName

()

override

{

return

typeName

; }

void

GetPropertyNames

(

const

TypeInfo

typeInfo

collections

List

GlobalStringKey

propertyNames

)

override

{

propertyNames

Add

(

_Text

);

propertyNames

Add

(

_Image

);

propertyNames

Add

(

_Tag

);

propertyNames

Add

(

GlobalStringKey

Empty

); }

Ptr

GuiInstancePropertyInfo

GetPropertyType

(

const

PropertyInfo

propertyInfo

)

override

{

(

propertyInfo

propertyName

_Text

) {

auto

info

GuiInstancePropertyInfo

Assign

(

TypeInfoRetriver

WString

>::

CreateTypeInfo

());

info

usage

GuiInstancePropertyInfo

ConstructorArgument

;

info

bindability

GuiInstancePropertyInfo

Bindable

;

return

info

; }

else

(

propertyInfo

propertyName

_Image

) {

auto

info

GuiInstancePropertyInfo

Assign

(

TypeInfoRetriver

Ptr

GuiImageData

>>::

CreateTypeInfo

());

info

usage

GuiInstancePropertyInfo

ConstructorArgument

;

info

bindability

GuiInstancePropertyInfo

Bindable

;

return

info

; }

else

(

propertyInfo

propertyName

_Tag

) {

return

GuiInstancePropertyInfo

Assign

(

TypeInfoRetriver

Value

>::

CreateTypeInfo

()); }

else

(

propertyInfo

propertyName

GlobalStringKey

Empty

) {

return

GuiInstancePropertyInfo

Collection

(

TypeInfoRetriver

Ptr

tree

MemoryNodeProvider

>>::

CreateTypeInfo

()); }

return

IGuiInstanceLoader

GetPropertyType

(

propertyInfo

); }

bool

CanCreate

(

const

TypeInfo

typeInfo

)

override

{

return

typeInfo

typeName

GetTypeName

(); }

Ptr

workflow

WfStatement

CreateInstance

(

GuiResourcePrecompileContext

precompileContext

types

ResolvingResult

resolvingResult

const

TypeInfo

typeInfo

GlobalStringKey

variableName

ArgumentMap

arguments

GuiResourceTextPos

tagPosition

GuiResourceError

List

errors

)

override

{

(

CanCreate

(

typeInfo

)) {

auto

createItem

MakePtr

WfNewClassExpression

>();

createItem

type

GetTypeFromTypeInfo

(

TypeInfoRetriver

Ptr

tree

TreeViewItem

>>::

CreateTypeInfo

().

Obj

());

vint

imageIndex

arguments

Keys

().

IndexOf

(

_Image

);

vint

textIndex

arguments

Keys

().

IndexOf

(

_Text

);

(

imageIndex

!= -

textIndex

!= -

) {

(

imageIndex

== -

) {

auto

nullExpr

MakePtr

WfLiteralExpression

>();

nullExpr

value

WfLiteralValue

Null

;

createItem

arguments

Add

(

nullExpr

); }

else

{

createItem

arguments

Add

(

arguments

GetByIndex

(

imageIndex

)

[

expression

); }

(

textIndex

== -

) {

createItem

arguments

Add

(

MakePtr

WfStringExpression

>()); }

else

{

createItem

arguments

Add

(

arguments

GetByIndex

(

textIndex

)

[

expression

); } }

auto

createNode

MakePtr

WfNewClassExpression

>();

createNode

type

GetTypeFromTypeInfo

(

TypeInfoRetriver

Ptr

tree

MemoryNodeProvider

>>::

CreateTypeInfo

().

Obj

());

createNode

arguments

Add

(

createItem

);

auto

refNode

MakePtr

WfReferenceExpression

>();

refNode

name

value

variableName

ToString

();

auto

assign

MakePtr

WfBinaryExpression

>();

assign

WfBinaryOperator

Assign

;

assign

first

refNode

;

assign

second

createNode

;

auto

stat

MakePtr

WfExpressionStatement

>();

stat

expression

assign

;

return

stat

; }

return

nullptr

; }

Ptr

workflow

WfStatement

AssignParameters

(

GuiResourcePrecompileContext

precompileContext

types

ResolvingResult

resolvingResult

const

TypeInfo

typeInfo

GlobalStringKey

variableName

ArgumentMap

arguments

GuiResourceTextPos

attPosition

GuiResourceError

List

errors

)

override

{

auto

block

MakePtr

WfBlockStatement

>();

FOREACH_INDEXER(GlobalStringKey, prop, index, arguments.Keys())

(

bool

__scope_variable_flag__

true

)

for

(

const

collections

ForEachIterator

GlobalStringKey

__foreach_iterator__

= ::

collections

CreateForEachIterator

(

arguments

Keys

());

__scope_variable_flag__

;

__scope_variable_flag__

false

)

(

bool

__scope_variable_flag__

true

)

for

(

vint

index

;

__scope_variable_flag__

;

__scope_variable_flag__

false

)

for

(

GlobalStringKey

prop

;

__foreach_iterator__

(

prop

);

index

++)

{

(

prop

GlobalStringKey

Empty

) {

auto

refNode

MakePtr

WfReferenceExpression

>();

refNode

name

value

variableName

ToString

();

auto

refChildren

MakePtr

WfMemberExpression

>();

refChildren

parent

refNode

;

refChildren

name

value

L"Children"

;

auto

refAdd

MakePtr

WfMemberExpression

>();

refAdd

parent

refChildren

;

refAdd

name

value

L"Add"

;

auto

call

MakePtr

WfCallExpression

>();

call

function

refAdd

;

call

arguments

Add

(

arguments

GetByIndex

(

index

)

[

expression

);

auto

stat

MakePtr

WfExpressionStatement

>();

stat

expression

call

;

block

statements

Add

(

stat

); }

else

(

prop

_Tag

) { {

auto

refNode

MakePtr

WfReferenceExpression

>();

refNode

name

value

variableName

ToString

();

auto

refData

MakePtr

WfMemberExpression

>();

refData

parent

refNode

;

refData

name

value

L"Data"

;

auto

castExpr

MakePtr

WfTypeCastingExpression

>();

castExpr

strategy

WfTypeCastingStrategy

Strong

;

castExpr

type

GetTypeFromTypeInfo

(

TypeInfoRetriver

Ptr

tree

TreeViewItem

>>::

CreateTypeInfo

().

Obj

());

castExpr

expression

refData

;

auto

refProp

MakePtr

WfMemberExpression

>();

refProp

parent

castExpr

;

refProp

name

value

L"tag"

;

auto

assign

MakePtr

WfBinaryExpression

>();

assign

WfBinaryOperator

Assign

;

assign

first

refProp

;

assign

second

arguments

GetByIndex

(

index

)

[

expression

;

auto

stat

MakePtr

WfExpressionStatement

>();

stat

expression

assign

;

block

statements

Add

(

stat

); }

(

prop

_Tag

) {

auto

refNode

MakePtr

WfReferenceExpression

>();

refNode

name

value

variableName

ToString

();

auto

refNotifyDataModified

MakePtr

WfMemberExpression

>();

refNotifyDataModified

parent

refNode

;

refNotifyDataModified

name

value

L"NotifyDataModified"

;

auto

call

MakePtr

WfCallExpression

>();

call

function

refNotifyDataModified

;

auto

stat

MakePtr

WfExpressionStatement

>();

stat

expression

call

;

block

statements

Add

(

stat

); } } }

(

block

statements

Count

() >

) {

return

block

; }

return

nullptr

; } };

/*********************************************************************** GuiBindableDataGridInstanceLoader ***********************************************************************/

#define BASE_TYPE GuiTemplateControlInstanceLoader<GuiBindableDataGrid>

class GuiBindableDataGridInstanceLoader : public BASE_TYPE

class

GuiBindableDataGridInstanceLoader

public

GuiTemplateControlInstanceLoader

GuiBindableDataGrid

{

protected

GlobalStringKey

typeName

;

public

GuiBindableDataGridInstanceLoader

()

:BASE_TYPE(description::TypeInfo<GuiBindableDataGrid>::content.typeName, theme::ThemeName::ListView)

GuiTemplateControlInstanceLoader

GuiBindableDataGrid

description

TypeInfo

GuiBindableDataGrid

>::

content

.typeName,

theme

ThemeName

ListView

)

{

typeName

GlobalStringKey

Get

(

description

TypeInfo

GuiBindableDataGrid

>::

content

.typeName); }

GlobalStringKey

GetTypeName

()

override

{

return

typeName

; } };

#undef BASE_TYPE

/*********************************************************************** Initialization ***********************************************************************/

void

LoadListControls

(

IGuiInstanceLoaderManager

manager

) {

manager

CreateVirtualType

(

GlobalStringKey

Get

(

description

TypeInfo

GuiComboBoxListControl

>::

content

.typeName),

new

GuiComboBoxInstanceLoader

);

manager

SetLoader

(

new

GuiTreeViewInstanceLoader

);

manager

SetLoader

(

new

GuiBindableTreeViewInstanceLoader

);

manager

SetLoader

(

new

GuiBindableDataGridInstanceLoader

);

manager

CreateVirtualType

(

GlobalStringKey

Get

(

description

TypeInfo

tree

MemoryNodeProvider

>::

content

.typeName),

new

GuiTreeNodeInstanceLoader

); } } } }

#endif