GuiInstanceLoader_TemplateControl.h

#include "../../Resources/GuiResource.h"

#include "../WorkflowCodegen/GuiInstanceLoader_WorkflowCodegen.h"

#ifndef VCZH_PRESENTATION_REFLECTION_INSTANCELOADERS_GUIINSTANCELOADER_TEMPLATECONTROL

#define VCZH_PRESENTATION_REFLECTION_INSTANCELOADERS_GUIINSTANCELOADER_TEMPLATECONTROL

namespace

{

namespace

presentation

{

namespace

instance_loaders

{

using

namespace

collections

;

using

namespace

reflection

description

;

using

namespace

controls

;

using

namespace

compositions

;

using

namespace

theme

;

using

namespace

helper_types

;

using

namespace

elements

;

using

namespace

compositions

;

using

namespace

controls

;

using

namespace

templates

;

using

namespace

workflow

;

using

namespace

workflow

analyzer

;

#ifndef VCZH_DEBUG_NO_REFLECTION

/***********************************************************************

/*********************************************************************** GuiVrtualTypeInstanceLoader ***********************************************************************/

GuiVrtualTypeInstanceLoader

***********************************************************************/

template

typename

TControl

class

GuiTemplateControlInstanceLoader

public

Object

public

IGuiInstanceLoader

{

typedef

Ptr

WfExpression

ArgumentRawFunctionType

(

ArgumentMap

&);

typedef

void

InitRawFunctionType

(

const

WString

Ptr

WfBlockStatement

>);

typedef

Func

ArgumentRawFunctionType

ArgumentFunctionType

;

typedef

Func

InitRawFunctionType

InitFunctionType

;

protected

GlobalStringKey

typeName

;

theme

ThemeName

themeName

;

ArgumentFunctionType

argumentFunction

;

InitFunctionType

initFunction

;

virtual

void

AddAdditionalArguments

(

types

ResolvingResult

resolvingResult

const

TypeInfo

typeInfo

GlobalStringKey

variableName

ArgumentMap

arguments

GuiResourceError

List

errors

Ptr

WfNewClassExpression

createControl

) { }

public

static

Ptr

WfExpression

CreateThemeName

(

theme

ThemeName

themeName

) {

auto

refExpr

MakePtr

WfChildExpression

>();

refExpr

parent

GetExpressionFromTypeDescriptor

(

description

GetTypeDescriptor

ThemeName

>());

switch

(

themeName

) {

#define THEME_NAME_CASE(TEMPLATE, CONTROL) case theme::ThemeName::CONTROL: refExpr->name.value = L ## #CONTROL; break;

GUI_CONTROL_TEMPLATE_TYPES(THEME_NAME_CASE)

case

theme

ThemeName

Window

refExpr

name

value

L"Window"

;

break

;

case

theme

ThemeName

CustomControl

refExpr

name

value

L"CustomControl"

;

break

;

case

theme

ThemeName

Tooltip

refExpr

name

value

L"Tooltip"

;

break

;

case

theme

ThemeName

Label

refExpr

name

value

L"Label"

;

break

;

case

theme

ThemeName

ShortcutKey

refExpr

name

value

L"ShortcutKey"

;

break

;

case

theme

ThemeName

ScrollView

refExpr

name

value

L"ScrollView"

;

break

;

case

theme

ThemeName

GroupBox

refExpr

name

value

L"GroupBox"

;

break

;

case

theme

ThemeName

Tab

refExpr

name

value

L"Tab"

;

break

;

case

theme

ThemeName

ComboBox

refExpr

name

value

L"ComboBox"

;

break

;

case

theme

ThemeName

MultilineTextBox

refExpr

name

value

L"MultilineTextBox"

;

break

;

case

theme

ThemeName

SinglelineTextBox

refExpr

name

value

L"SinglelineTextBox"

;

break

;

case

theme

ThemeName

DocumentViewer

refExpr

name

value

L"DocumentViewer"

;

break

;

case

theme

ThemeName

DocumentLabel

refExpr

name

value

L"DocumentLabel"

;

break

;

case

theme

ThemeName

DocumentTextBox

refExpr

name

value

L"DocumentTextBox"

;

break

;

case

theme

ThemeName

ListView

refExpr

name

value

L"ListView"

;

break

;

case

theme

ThemeName

TreeView

refExpr

name

value

L"TreeView"

;

break

;

case

theme

ThemeName

TextList

refExpr

name

value

L"TextList"

;

break

;

case

theme

ThemeName

ListItemBackground

refExpr

name

value

L"ListItemBackground"

;

break

;

case

theme

ThemeName

TreeItemExpander

refExpr

name

value

L"TreeItemExpander"

;

break

;

case

theme

ThemeName

CheckTextListItem

refExpr

name

value

L"CheckTextListItem"

;

break

;

case

theme

ThemeName

RadioTextListItem

refExpr

name

value

L"RadioTextListItem"

;

break

;

case

theme

ThemeName

refExpr

name

value

L"Menu"

;

break

;

case

theme

ThemeName

MenuBar

refExpr

name

value

L"MenuBar"

;

break

;

case

theme

ThemeName

MenuSplitter

refExpr

name

value

L"MenuSplitter"

;

break

;

case

theme

ThemeName

MenuBarButton

refExpr

name

value

L"MenuBarButton"

;

break

;

case

theme

ThemeName

MenuItemButton

refExpr

name

value

L"MenuItemButton"

;

break

;

case

theme

ThemeName

ToolstripToolBar

refExpr

name

value

L"ToolstripToolBar"

;

break

;

case

theme

ThemeName

ToolstripButton

refExpr

name

value

L"ToolstripButton"

;

break

;

case

theme

ThemeName

ToolstripDropdownButton

refExpr

name

value

L"ToolstripDropdownButton"

;

break

;

case

theme

ThemeName

ToolstripSplitButton

refExpr

name

value

L"ToolstripSplitButton"

;

break

;

case

theme

ThemeName

ToolstripSplitter

refExpr

name

value

L"ToolstripSplitter"

;

break

;

case

theme

ThemeName

RibbonTab

refExpr

name

value

L"RibbonTab"

;

break

;

case

theme

ThemeName

RibbonGroup

refExpr

name

value

L"RibbonGroup"

;

break

;

case

theme

ThemeName

RibbonIconLabel

refExpr

name

value

L"RibbonIconLabel"

;

break

;

case

theme

ThemeName

RibbonSmallIconLabel

refExpr

name

value

L"RibbonSmallIconLabel"

;

break

;

case

theme

ThemeName

RibbonButtons

refExpr

name

value

L"RibbonButtons"

;

break

;

case

theme

ThemeName

RibbonToolstrips

refExpr

name

value

L"RibbonToolstrips"

;

break

;

case

theme

ThemeName

RibbonGallery

refExpr

name

value

L"RibbonGallery"

;

break

;

case

theme

ThemeName

RibbonToolstripMenu

refExpr

name

value

L"RibbonToolstripMenu"

;

break

;

case

theme

ThemeName

RibbonGalleryList

refExpr

name

value

L"RibbonGalleryList"

;

break

;

case

theme

ThemeName

RibbonGalleryItemList

refExpr

name

value

L"RibbonGalleryItemList"

;

break

;

case

theme

ThemeName

RibbonSmallButton

refExpr

name

value

L"RibbonSmallButton"

;

break

;

case

theme

ThemeName

RibbonSmallDropdownButton

refExpr

name

value

L"RibbonSmallDropdownButton"

;

break

;

case

theme

ThemeName

RibbonSmallSplitButton

refExpr

name

value

L"RibbonSmallSplitButton"

;

break

;

case

theme

ThemeName

RibbonLargeButton

refExpr

name

value

L"RibbonLargeButton"

;

break

;

case

theme

ThemeName

RibbonLargeDropdownButton

refExpr

name

value

L"RibbonLargeDropdownButton"

;

break

;

case

theme

ThemeName

RibbonLargeSplitButton

refExpr

name

value

L"RibbonLargeSplitButton"

;

break

;

case

theme

ThemeName

RibbonSplitter

refExpr

name

value

L"RibbonSplitter"

;

break

;

case

theme

ThemeName

RibbonToolstripHeader

refExpr

name

value

L"RibbonToolstripHeader"

;

break

;

case

theme

ThemeName

Button

refExpr

name

value

L"Button"

;

break

;

case

theme

ThemeName

CheckBox

refExpr

name

value

L"CheckBox"

;

break

;

case

theme

ThemeName

RadioButton

refExpr

name

value

L"RadioButton"

;

break

;

case

theme

ThemeName

DatePicker

refExpr

name

value

L"DatePicker"

;

break

;

case

theme

ThemeName

DateComboBox

refExpr

name

value

L"DateComboBox"

;

break

;

case

theme

ThemeName

HScroll

refExpr

name

value

L"HScroll"

;

break

;

case

theme

ThemeName

VScroll

refExpr

name

value

L"VScroll"

;

break

;

case

theme

ThemeName

HTracker

refExpr

name

value

L"HTracker"

;

break

;

case

theme

ThemeName

VTracker

refExpr

name

value

L"VTracker"

;

break

;

case

theme

ThemeName

ProgressBar

refExpr

name

value

L"ProgressBar"

;

break

;

#undef THEME_NAME_CASE

default

CHECK_FAIL(L"GuiTemplateControlInstanceLoader::CreateThemeName()#Unknown theme name.");

{

throw

Error

(

L"GuiTemplateControlInstanceLoader::CreateThemeName()#Unknown theme name."

);}

while

(

);

}

return

refExpr

; }

public

GuiTemplateControlInstanceLoader

(

const

WString

_typeName

theme

ThemeName

_themeName

ArgumentRawFunctionType

_argumentFunction

nullptr

InitRawFunctionType

_initFunction

nullptr

) :typeName(

GlobalStringKey

Get

(

_typeName

)) , themeName(

_themeName

) {

(

_argumentFunction

)

argumentFunction

_argumentFunction

;

(

_initFunction

)

initFunction

_initFunction

; }

GlobalStringKey

GetTypeName

()

override

{

return

typeName

; }

bool

CanCreate

(

const

TypeInfo

typeInfo

)

override

{

return

typeName

typeInfo

typeName

; }

Ptr

workflow

WfBaseConstructorCall

CreateRootInstance

(

GuiResourcePrecompileContext

precompileContext

types

ResolvingResult

resolvingResult

const

TypeInfo

typeInfo

ArgumentMap

arguments

GuiResourceError

List

errors

)

override

{

auto

createControl

MakePtr

WfBaseConstructorCall

>();

createControl

type

GetTypeFromTypeInfo

(

TypeInfoRetriver

TControl

>::

CreateTypeInfo

().

Obj

());

createControl

arguments

Add

(

CreateThemeName

(

themeName

));

return

createControl

; }

Ptr

workflow

WfStatement

CreateInstance

(

GuiResourcePrecompileContext

precompileContext

types

ResolvingResult

resolvingResult

const

TypeInfo

typeInfo

GlobalStringKey

variableName

ArgumentMap

arguments

GuiResourceTextPos

tagPosition

GuiResourceError

List

errors

)

override

{

CHECK_ERROR(CanCreate(typeInfo), L"GuiTemplateControlInstanceLoader::CreateInstance()#Wrong type info is provided.");

{

(!(

CanCreate

(

typeInfo

)))

throw

Error

(

L"GuiTemplateControlInstanceLoader::CreateInstance()#Wrong type info is provided."

);}

while

(

);

auto

block

MakePtr

WfBlockStatement

>(); {

auto

controlType

TypeInfoRetriver

TControl

*>::

CreateTypeInfo

();

auto

createControl

MakePtr

WfNewClassExpression

>();

createControl

type

GetTypeFromTypeInfo

(

controlType

Obj

());

createControl

arguments

Add

(

CreateThemeName

(

themeName

));

(

argumentFunction

) {

createControl

arguments

Add

(

argumentFunction

(

arguments

)); }

AddAdditionalArguments

(

resolvingResult

typeInfo

variableName

arguments

errors

createControl

);

auto

refVariable

MakePtr

WfReferenceExpression

>();

refVariable

name

value

variableName

ToString

();

auto

assignExpr

MakePtr

WfBinaryExpression

>();

assignExpr

WfBinaryOperator

Assign

;

assignExpr

first

refVariable

;

assignExpr

second

createControl

;

auto

assignStat

MakePtr

WfExpressionStatement

>();

assignStat

expression

assignExpr

;

block

statements

Add

(

assignStat

); }

(

initFunction

) {

initFunction

(

variableName

ToString

(),

block

); }

return

block

; } };

#endif

} } }

#endif