pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

Thai Inter : bug show Root path

Browse source
This commit is contained in:
thanawat saiyota 2024-11-29 11:07:15 +07:00
parent 01163df0f8
commit a406dbab8f
15 changed files with 77 additions and 204 deletions
Download patch file Download diff file Expand all files Collapse all files

13
inter/tha/xml/multi/page_catalog_group_coffee.lxml
View file

@ -24,7 +24,7 @@
Var Menu2Selected = "PressForever"
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
Var Timeout = 0
@ -180,17 +180,6 @@
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst5 = EnabledBlockUpdateInst5 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
If SaveStringInst = "ShowThai" Then

13
inter/tha/xml/multi/page_catalog_group_coffee.skt
View file

@ -26,7 +26,7 @@
Var Menu2Selected = "PressForever"
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
Var Timeout = 0
@ -200,17 +200,6 @@
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

18
inter/tha/xml/multi/page_catalog_group_forkid.lxml
View file

@ -35,7 +35,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -175,28 +175,12 @@
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
GetEnabledDrawBlockCount EnabledBlocksDrawInst8
GetEnabledUpdateBlockCount EnabledBlockUpdateInst8
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst8
DEBUGVAR EnabledBlocksDrawInst8
If EnabledBlocksDrawInst8 = EnabledBlockUpdateInst8 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile

17
inter/tha/xml/multi/page_catalog_group_forkid.skt
View file

@ -38,7 +38,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -221,24 +221,9 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst6
DEBUGVAR EnabledBlocksDrawInst6
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

19
inter/tha/xml/multi/page_catalog_group_health.lxml
View file

@ -23,7 +23,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -164,8 +164,6 @@
InstanceGetString SaveStringInst
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
GetEnabledDrawBlockCount EnabledBlocksDrawInst9
GetEnabledUpdateBlockCount EnabledBlockUpdateInst9
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
@ -173,25 +171,10 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst9
DEBUGVAR EnabledBlocksDrawInst9
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst9 = EnabledBlockUpdateInst9 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf

62
inter/tha/xml/multi/page_catalog_group_health.skt
View file

@ -26,7 +26,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -181,6 +181,66 @@
TimerReset
</EventTimeout>
<EventOnShow>
InstanceGetString SaveStringInst
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
EndIf
DEBUGVAR LanguageShow
If SaveStringInst = "ShowThai" Then
If LanguageShow = "THAI" Then
Else
Var show_eng = "true"
InstanceSetString "ShowMYANMAR"
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
EndIf
EndIf
If SaveStringInst = "ShowMYANMAR" Then
If LanguageShow = "MYANMAR" Then
Else
Var show_eng = "false"
InstanceSetString "ShowEng"
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
EndIf
EndIf
If SaveStringInst = "ShowEng" Then
If LanguageShow = "ENG" Then
Else
Var show_eng = "false"
InstanceSetString "ShowThai"
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
EndIf
EndIf
</EventOnShow>
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new.lxml"
<?hurr

19
inter/tha/xml/multi/page_catalog_group_milk.lxml
View file

@ -23,7 +23,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -167,33 +167,16 @@
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
GetEnabledDrawBlockCount EnabledBlocksDrawInst7
GetEnabledUpdateBlockCount EnabledBlockUpdateInst7
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst7
DEBUGVAR EnabledBlocksDrawInst7
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst7 = EnabledBlockUpdateInst7 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

16
inter/tha/xml/multi/page_catalog_group_milk.skt
View file

@ -25,7 +25,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -192,24 +192,10 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst6
DEBUGVAR EnabledBlocksDrawInst6
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

19
inter/tha/xml/multi/page_catalog_group_other_other.lxml
View file

@ -24,7 +24,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -151,33 +151,16 @@
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
GetEnabledDrawBlockCount EnabledBlocksDrawInst10
GetEnabledUpdateBlockCount EnabledBlockUpdateInst10
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst10
DEBUGVAR EnabledBlocksDrawInst10
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst10 = EnabledBlockUpdateInst10 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf

15
inter/tha/xml/multi/page_catalog_group_other_other.skt
View file

@ -27,7 +27,7 @@
RootLayoutVisible 12 "show"
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
SetInstanceIgnoreTouch
@ -161,23 +161,12 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst6
DEBUGVAR EnabledBlocksDrawInst6
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

17
inter/tha/xml/multi/page_catalog_group_pepsi_7up.lxml
View file

@ -24,7 +24,7 @@
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
@ -168,8 +168,6 @@
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
GetEnabledDrawBlockCount EnabledBlocksDrawInst11
GetEnabledUpdateBlockCount EnabledBlockUpdateInst11
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
@ -177,25 +175,12 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst11
DEBUGVAR EnabledBlocksDrawInst11
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst11 = EnabledBlockUpdateInst11 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf

17
inter/tha/xml/multi/page_catalog_group_pepsi_7up.skt
View file

@ -27,7 +27,7 @@
Var Timeout = 0
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/menu_catalog_new_menu.lxml"
@ -195,24 +195,11 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst6
DEBUGVAR EnabledBlocksDrawInst6
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

2
inter/tha/xml/multi/page_catalog_group_recommend.lxml
View file

@ -26,7 +26,7 @@
SAVELOG PreviseXMLFileName2
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
Var Timeout = 0

18
inter/tha/xml/multi/page_catalog_group_tea.lxml
View file

@ -28,7 +28,7 @@
SAVELOG PreviseXMLFileName2
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
Var Timeout = 0
@ -160,8 +160,6 @@
DEBUGVAR SaveStringInst
DEBUGVAR show_eng
GetEnabledDrawBlockCount EnabledBlocksDrawInst6
GetEnabledUpdateBlockCount EnabledBlockUpdateInst6
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
@ -169,24 +167,10 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst6
DEBUGVAR EnabledBlocksDrawInst6
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow

16
inter/tha/xml/multi/page_catalog_group_tea.skt
View file

@ -31,7 +31,7 @@
SAVELOG PreviseXMLFileName2
;include=""ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_show_and_refresh.lxml"
Var Timeout = 0
@ -187,24 +187,10 @@
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
DEBUGVAR EnabledBlockUpdateInst6
DEBUGVAR EnabledBlocksDrawInst6
If SaveStringInst = "RefreshNow" Then
GetXMLFileNameCurrentRunning CurrentOpenFile
Open CurrentOpenFile
Else
If EnabledBlocksDrawInst6 = EnabledBlockUpdateInst6 Then
Var StatusRefresh = "NoRefresh"
DEBUGVAR StatusRefresh
Else
Var StatusRefresh = "Refresh"
DEBUGVAR StatusRefresh
GetXMLFileNameCurrentRunning CurrentOpenFile2
Open CurrentOpenFile2
EndIf
EndIf
DEBUGVAR LanguageShow