Soui六-Aet

1

2

3

4

5

6

SWKeLoader wkeLoader;

if (wkeLoader.Init(_T("wke.dll"))) {

theApp->RegisterWndFactory(TplSWindowFactory<SWkeWebkit>());

}

theApp->RegisterWndFactory(TplSWindowFactory<SGifPlayer>());

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

class SWindowFactory {

public:

virtual ~SWindowFactory();

virtual SWindow* NewWindow() = 0;

virtual LPCWSTR SWindowBaseName() = 0;

virtual const SStringW& getWindowType() = 0;

virtual SWndowFactory* Clone() const = 0;

};

template <typename T>

class TplSWindowFactory : public SWindowFactory {

public:

//! Default constructor.

TplSWindowFactory():m_strTypeName(T::GetClassName()) {

}

LPCWSTR SWindowBaseName(){ return T::BaseClassName();}

// Implement WindowFactory interface

virtual SWindow* NewWindow() {

return new T;

}

virtual const SStringW & getWindowType() {

return m_strTypeName;

}

virtual SWindowFactory* Clone() const {

return new TplSWindowFactory();

}

protected:

SStringW m_strTypeName;

};

1

2

3

4

5

6

7

8

9

10

11

12

class SOUI_EXP SWindow : public SObject

, public SMsgHandleState

, public TObjRefImpl2<IObjRef,SWindow>

{

SOUI_CLASS_NAME(SWindow, L"window")

//....

};

class SOUI_EXP SSkinObjBase : public TObjRefImpl<ISkinObj>

{

//......

};

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

template<class T>

class TObjRefImpl : public T

{

public:

TObjRefImpl():m_cRef(1)

{

}

virtual ~TObjRefImpl(){

}

//!添加引用

/*!

*/

virtual void AddRef()

{

InterlockedIncrement(&m_cRef);

}

//!释放引用

/*!

*/

virtual void Release()

{

InterlockedDecrement(&m_cRef);

if(m_cRef==0)

{

OnFinalRelease();

}

//!释放对象

/*!

*/

virtual void OnFinalRelease()

{

delete this;

}

protected:

volatile LONG m_cRef;

};

template<class T,class T2>

class TObjRefImpl2 : public TObjRefImpl<T>

{

public:

virtual void OnFinalRelease()

{

delete static_cast<T2*>(this);

}

};

1

2

3

4

5

6

m_pAccelerateQualityWnd = new AccelerateQualityWnd();

g_pFramework->InsertNewChild(m_pAccelerateQualityWnd);

g_pFramework->MoveChild(m_pAccelerateQualityWnd, L"0, -190, -0, @190");

g_pFramework->CreateChildren(L"xml_accelerate_quality_dlg", m_pAccelerateQualityWnd);

m_pAccelerateQualityWnd->InitControls();

m_pAccelerateQualityWnd->SetVisible(FALSE, TRUE);

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

BOOL SWindow::CreateChildren(pugi::xml_node xmlNode)

{

TestMainThread();

for (pugi::xml_node xmlChild=xmlNode.first_child(); xmlChild; xmlChild=xmlChild.next_sibling())

{

if(xmlChild.type() != pugi::node_element) continue;

if(_wcsicmp(xmlChild.name(),KLabelInclude)==0)

{//在窗口布局中支持include标签

SStringW strSrc = S_CW2T(xmlChild.attribute(L"src").value());

pugi::xml_document xmlDoc;

SStringTList strLst;

if(2 == ParseResID(strSrc,strLst))

{

LOADXML(xmlDoc,strLst[1],strLst[0]);

}else

{

LOADXML(xmlDoc,strLst[0],RT_LAYOUT);

}

if(xmlDoc)

{

CreateChildren(xmlDoc.child(KLabelInclude));

}else

{

SASSERT(FALSE);

}

}else if(!xmlChild.get_userdata())//通过userdata来标记一个节点是否可以忽略

{

SWindow *pChild = SApplication::getSingleton().CreateWindowByName(xmlChild.name());

if(pChild)

{

InsertChild(pChild);

pChild->InitFromXml(xmlChild);

}

return TRUE;

}

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

BOOL SWindow::OnRelayout(const CRect &rcWnd)

{

if (rcWnd.EqualRect(m_rcWindow) && m_layoutDirty == dirty_clean)

return FALSE;

if(!rcWnd.EqualRect(m_rcWindow))

{

m_layoutDirty = dirty_self;

InvalidateRect(m_rcWindow);

m_rcWindow = rcWnd;

if(m_rcWindow.left>m_rcWindow.right)

m_rcWindow.right = m_rcWindow.left;

if(m_rcWindow.top>m_rcWindow.bottom)

m_rcWindow.bottom = m_rcWindow.top;

InvalidateRect(m_rcWindow);

SSendMessage(WM_NCCALCSIZE);//计算非客户区大小

}

//only if window is visible now, we do relayout.

if (IsVisible(FALSE))

{

//don't call UpdateLayout, otherwise will result in dead cycle.

if (m_layoutDirty != dirty_clean && GetChildrenCount())

{

UpdateChildrenPosition();//更新子窗口位置

}

m_layoutDirty = dirty_clean;

}

else

{//mark layout to self dirty.

m_layoutDirty = dirty_self;

}

CRect rcClient;

GetClientRect(&rcClient);

SSendMessage(WM_SIZE,0,MAKELPARAM(rcClient.Width(),rcClient.Height()));

return TRUE;

}

1

2

3

4

5

6

7

8

//加载LUA脚本模块。

#if (defined(DLL_CORE) || defined(LIB_ALL)) && !defined(_WIN64)

//加载LUA脚本模块，注意，脚本模块只有在SOUI内核是以DLL方式编译时才能使用。

CAutoRefPtr<SOUI::IScriptFactory> pScriptLuaFactory;

bLoaded = pComMgr->CreateScrpit_Lua((IObjRef**)&pScriptLuaFactory);

SASSERT_FMT(bLoaded, _T("load interface [%s] failed!"), _T("scirpt_lua"));

theApp->SetScriptFactory(pScriptLuaFactory);

#endif//DLL_CORE

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

<skin>

</skin>

<style>

</style>

<![CDATA[

function on_init(args)

SMessageBox(0,T "execute script function: on_init", T "msgbox", 1);

end

function on_exit(args)

SMessageBox(0,T "execute script function: on_exit", T "msgbox", 1);

end

function onEvtTest2(args)

SMessageBox(0,T "onEvtTest2", T "msgbox", 1);

return 1;

end

function onEvtTstClick(args)

local txt3=SStringW(L"append",-1);

local sender=toSWindow(args.sender);

sender:GetParent():CreateChildrenFromString(L"<button pos=\"0,0,150,30\" on_command=\"onEvtTest2\">lua btn 中文</button>");

sender:SetVisible(0,1);

return 1;

end

]]>

</script>

<text class="cls_txt_red">SOUI-DEMO version:%ver%</text>

</caption>

</root>

</SOUI>

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

<?xml version="1.0" encoding="utf-8"?>

</gifplayer>

</gifplayer>

</gifplayer>

</gifplayer>

</window>

</window>

</window>

</include>

1

2

3

4

5

6

class SOUI_EXP EventCmd : public TplEventArgs<EventCmd> {

SOUI_CLASS_NAME(EventCmd, L"on_command")

public:

EventCmd(SObject *pSender):TplEventArgs<EventCmd>(pSender){}

enum{EventID=EVT_CMD};

};

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

52

53

54

55

56

57

58

59

60

61

62

63

64

65

66

67

68

69

70

71

72

73

74

75

76

77

78

79

80

81

82

83

84

85

86

87

88

89

90

91

92

93

94

95

96

97

98

99

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

win = nil;

tid = 0;

gamewnd = nil;

gamecanvas = nil;

players = {};

flag_win = nil;

coins_all = 100; --现有资金

coins_bet = {0,0,0,0} --下注金额

bet_rate = 4; --赔率

prog_max = 200; --最大步数

prog_all = {0,0,0,0} --马匹进度

function on_init(args)

--初始化全局对象

win = toHostWnd(args.sender);

gamewnd = win:GetRoot():FindChildByNameA("game_wnd",-1);

gamecanvas = gamewnd:FindChildByNameA("game_canvas",-1);

flag_win = gamewnd:FindChildByNameA("flag_win",-1);

players = {

gamecanvas:FindChildByNameA("player_1",-1),

gamecanvas:FindChildByNameA("player_2",-1),

gamecanvas:FindChildByNameA("player_3",-1),

gamecanvas:FindChildByNameA("player_4",-1)

};

--布局

on_canvas_size(nil);

math.randomseed(os.time());

--SMessageBox(0,T "execute script function: on_init", T "msgbox", 1);

end

function on_exit(args)

--SMessageBox(0,T "execute script function: on_exit", T "msgbox", 1);

end

function on_timer(args)

if(gamewnd ~= nil) then

local rcCanvas = gamecanvas:GetWindowRect2();

local heiCanvas = rcCanvas:Height();

local widCanvas = rcCanvas:Width();

local rcPlayer = players[1]:GetWindowRect2();

local wid = rcPlayer:Width();

local hei = rcPlayer:Height();

local win_id = 0;

for i = 1,4 do

local prog = prog_all[i];

if(prog<prog_max) then

prog = prog + math.random(0,5);

prog_all[i] = prog;

local rc = players[i]:GetWindowRect2();

rc.left = rcCanvas.left + (widCanvas-wid)*prog/prog_max;

players[i]:Move2(rc.left,rc.top,-1,-1);

else

win_id = i;

local rc = players[i]:GetWindowRect2();

rc.left = rcCanvas.left + (widCanvas-wid);

players[i]:Move2(rc.left,rc.top,-1,-1);

end

if win_id ~= 0 then

gamewnd:FindChildByNameA("btn_run",-1):FireCommand();

coins_all = coins_all + coins_bet[win_id] * 4;

gamewnd:FindChildByNameA("txt_coins",-1):SetWindowText(T(coins_all));

coins_bet = {0,0,0,0};

local rcPlayer = players[win_id]:GetWindowRect2();

local szFlag = flag_win:GetDesiredSize(rcPlayer);

rcPlayer.right = rcPlayer.left + szFlag.cx;

rcPlayer.bottom = rcPlayer.top + szFlag.cy;

rcPlayer:OffsetRect(-szFlag.cx,-szFlag.cy/3);

flag_win:Move(rcPlayer);

flag_win:SetVisible(1,1);

flag_win:SetUserData(win_id);

for i= 1,4 do

gamewnd:FindChildByID(i,-1):SetWindowText(T("0"));

end

function on_bet(args)

if tid ~= 0 then

return 1;

end

local btn = toSWindow(args.sender);

if coins_all >= 10 then

id = btn:GetID();

coins_bet[id] = coins_bet[id] + 10;

coins_all = coins_all -10;

btn:SetWindowText(T(coins_bet[id]));

gamewnd:FindChildByNameA("txt_coins",-1):SetWindowText(T(coins_all));

end

return 1;

end

function on_canvas_size(args)

if win == nil then

return 0;

end

local rcCanvas = gamecanvas:GetWindowRect2();

local heiCanvas = rcCanvas:Height();

local widCanvas = rcCanvas:Width();

local szPlayer = players[1]:GetDesiredSize(rcCanvas);

local wid = szPlayer.cx;

local hei = szPlayer.cy;

local rcPlayer = CRect(0,0,wid,hei);

local interval = (heiCanvas - hei*4)/5;

rcPlayer:OffsetRect(rcCanvas.left,rcCanvas.top+interval);

for i = 1, 4 do

local rc = rcPlayer;

rc.left = rcCanvas.left + (widCanvas-wid)*prog_all[i]/prog_max;

rc.right = rc.left+wid;

players[i]:Move(rc);

rcPlayer:OffsetRect(0,interval+hei);

end

local win_id = flag_win:GetUserData();

if win_id ~= 0 then

local rcPlayer = players[win_id]:GetWindowRect2();

local szFlag = flag_win:GetDesiredSize(rcPlayer);

flag_win:Move2(rcPlayer.left-szFlag.cx,rcPlayer.top-szFlag.cy/3,-1,-1);

end

return 1;

end

function on_run(args)

local btn = toSWindow(args.sender);

if tid == 0 then

prog_all = {0,0,0,0};

on_canvas_size(nil);

tid = win:setInterval("on_timer",200);

btn:SetWindowText(T"stop");

flag_win:SetVisible(0,1);

else

win:clearTimer(tid);

btn:SetWindowText(T"run");

tid = 0;

end

return 1;

end

function on_btn_select_cbx(args)

local btn = toSWindow(args.sender);

local cbxwnd = btn:GetWindow(2);--get previous sibling

local cbx = toComboboxBase(cbxwnd);

cbx:SetCurSel(-1);

end

控件注册机制

使用

TplSWindowFactory

对象的释放

子窗口

Lua

你可能也喜欢

热评文章

发表评论

标签云集

2025年 4月
一	二	三	四	五	六	日
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