توست مسیج هنگام خروج

[طاها 480]

سلام دوستان. چطوری میشه کارب کرد موقعی که کاربر میخواد خارج شه، پیام "برای خروج، یک بار دیگر دکمه را بزنیذ" نمایش داده بشه؟

[Mickket 32]

 اول Activity KeyPress رو از قسمت دیزاینر به کد اضافه کنید و  :

	If KeyCode=KeyCodes.KEYCODE_BACK Then
	If backpress Then
	Else
	If backtime.Enabled=False Then
	backtime.Enabled=True
	backpress=True
	ToastMessageShow("برای خروج دوباره بازگشت را لمس کنید",False)
	End If
	Return True
	End If
	End If

و توی ساب گلوبالز :

	Dim backpress As Boolean=False
	Dim backtime As Timer
	backtime.Initialize("backtime",3000)

توی ساب تایمر :
Sub backtime_Tick
	backpress=False
	backtime.Enabled=False
	
End Sub

از کد معلومه اگه ندونستید بگید توضیح بدم

[Elyas Erfani 3,582]

سلام

میتونید از کد زیر استفاده کنید

Sub Activity_Keypress (KeyCode As Int) As Boolean

If KeyCode=KeyCodes.KEYCODE_BACK Then Dim result As Int

Result = MsgBox2("Aya Kharej Mishavid ?" , "Exit ?" , "Yes" , "No" , "", Null)

If result = DialogResponse.POSITIVE Then

ExitApplication

Else If result = DialogResponse.CANCEL Then

Return True

End If

[پژمان نیکروان 6,055]

http://answercenter.ir/topic/1571-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D8%AF%D9%88%D8%A8%D8%A7%D8%B1%D9%87-%D8%AF%DA%A9%D9%85%D9%87-%D8%A8%D8%A7%D8%B2%DA%AF%D8%B4%D8%AA-%D8%B1%D8%A7-%D9%81%D8%B4%D8%A7%D8%B1-%D8%AF%D9%87%DB%8C%D8%AF-%D8%A8%D8%B1%D8%A7%DB%8C-%D8%AE%D8%B1%D9%88/