button side(2)

button side(2)
**************
ဒီတစ္ခါေတာ့buttonေလးေတေအာက္ကေတအေပၚကိုတတ္လာေအာင္ေရးျကမယ္။
pjမ်ားေပးတဲ႔အခါကုဒ္ရဲ႕သေဘာသဘာဝမ်ားသိလိုပါကအတိုးအေလ်ွာ႕သေဘာမ်ဳိးျဖစ္ေစစမ္းသပ္က်ိေစလိုတယ္။
main
--------
AddButton("b2",5%x,150%y,90%x,10%y,"")
SetColor("b2",0,cBlue)
SetTextColor("b2",cwhite)
SetText("b2","example")
SetTextSize("b2",18)
SetTimer2Enabled(true)
SetTimer2Interval(1)
AddButton("b3",5%x,150%y,90%x,10%y,"")
SetColor("b3",0,cBlue)
SetText("b3","example")
SetTextColor("b3",cwhite)
SetTextSize("b3",18)
SetTimer3Enabled(true)
SetTimer3Interval(1)
event
---------
Sub Timer2_Tick
SetTop("b2",getTop("b2") -5)
If getTop("b2") < 2%y then
SetTimer2Enabled(false)
end if
End Sub
Sub Timer3_Tick
SetTop("b3",getTop("b3") -2)
If getTop("b3") < 16%y then
SetTimer3Enabled(false)
end if
End Sub
test now
Timer codeing....


No automatic alt text available.

Comments