Exitbox

Exitbox ကိုတစ္​မ်ိဳး​ေလးသံုးခ်င္​သူအတြက္​ပါ အရငိဆံုးpanelတစ္​ခု​ေဆာက္​ၿပီ ​ေဖ်ာက္​ထားမယ္​အာ့panel​ေပၚမွာမွ buttonႏွစ္​ခုတင္​မယ္​ backkey ႏွိပ္​ရင္​ panel ​ေပၚလာမယ္​ အာ့panel​ေပၚကbutton တစ္​ခုကို ႏွိပ္​ရင္​ActivityFinishျဖစ္​မယ္​ ​ေနာက္​တစ္​ခုကိုႏွိပ္​ရင္​ Panel ​ေပ်ာက္​သြားမယ္​ အာ့လို​ေလးပါ ​ေသခ်ာ​ေတာ့မစမ္​းရ​ေသးပါဘူး အခုမွစိတ္​ကူး​ေပါက္​လို႔လုပ္​ၾကည္​့တာပါ အဆင္​​ေျပတယ္​ဆိုရင္​​ေတာ့ စိတ္​ကူး႐ွိသလိုထပိထည္​့ၿပီးသံုးၾက​ေပါ့

============
Main
============
AddPanel("p",10%x,20%y,80%x,40%y,"")
SetColor("p",0,cblue)
SetVisible("p",true)

AddButton("a",20%x,8%y,40%x,10%y,"p")
SetText("a","ထြက္​မယ္​")
SetColor("a",20,cCyan)

AddButton("b",20%x,22%y,40%x,10%y,"p")
SetText("b","မထြက္​ဘူး")
SetColor("b",20,cCyan)

============
Event
============
Sub Panel_Click(Who)
End Sub

Sub Button_Click(Who)

Select Who
Case"a"
ActivityFinish
ShowToast("တာ့တာ",false)

Case"b"

SetVisible("p",false)

ShowToast("မထြက္​ဘူးတဲ့",false)
End Select
End Sub
Sub Button_LongClick(Who)
End Sub

Sub Activity_KeyPress(key)

If key= 4 then

SetVisible("p",true)

End If
End Sub