رفتن به مطلب
  • 0

راهنمایی برای تنظیم خروج از برنامه


viki0028

سوال

درود سلام به همه سروران عزیز

 

سوالی داشتم از خدمت دوستان : در سورسی که به دستم رسیده وقتی روی هر کدوم از دکمه های خود گوشی ( کم و زیاد کن صدا، پاور و دوربین عکاسی ) کلیک میشه برنامه از من سوال میکنه که قصد خروج از برنامه را دارید؟ در حالی که فقط میخوام با کلیک بر روی گزینه برگشت گوشی و نهایتا انتخاب گزینه خروج از منو این اتفاق بیفته نه با دکمه های دیگر گوشی.

لطفا راهنمایی کنید چطور این کار را انجام بذم.....یا اینکه چطور این گزینه برای دکمه های دیگه غیر فعال کنم.....

 

نکته ای که هست وقتی روی دکمه های دیگه گوشی کلیک میشه و سوال پرسیده میشه ....و روی گزینه خیر کلیک میکنم متن has stopped نشون داده میشه و برنامه بسته نمیشه....البته این اتفاق با دکمه های ذکر شده که گفتم اتفاق میفته

لینک ارسال
به اشتراک گذاری در سایت های دیگر

5 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

سلام کد هاتون رو بزارید بررسی کنم.

 

 

Sub Activity_KeyPress (KeyCode As Int) As Boolean
'////////// برای خروج از برنامه تنظیم شده
'Pressing the menu key will open/close the slidemenu
If KeyCode = KeyCodes.KEYCODE_MENU Then
If sm.ayamenobazee Then sm.Hide Else sm.Show
Return True
End If
'/////  مربوط به خروج    /////'
If KeyCode = KeyCodes.KEYCODE_BACK And sm.ayamenobazee Then 
sm.Hide  
Return True
Else
pasokh = Msgbox2("آیا می خواهید از برنامه خارج شوید؟","پیغام خروج","بله","","خیر",Null)
  If pasokh = DialogResponse.POSITIVE Then
    ExitApplication
Else
Return True
End If
End If
  • End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

عزیز من متوجه این متغیر ها نشدم چون به جاهای دیگه مربوطه که کد هارو نزاشتید ولی به جای این تابع , این تابعی که مینویسم رو بزارید :

Sub Activity_KeyPress(KeyCode As Int) As Boolean 
	Dim Answ As Int
	Dim matn As String
	
	If KeyCode = KeyCodes.KEYCODE_BACK Then	
		matn = "میخوای بری ؟"
		Answ = Msgbox2(matn, "هشدار", "بله", "", "خیر", Null) 
		If Answ = DialogResponse.POSITIVE Then	
			Return False		
		Else				
			Return True		
		End If				
	Else
		Return True			
	End If
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

قسمت اول کدتون مربوط به خروج نیست فقط برای باز و بسته شدن منو هستش مشکل شما شرط قسمت دوم کدتون هست که باید به این صورت اصلاح کنید:

If KeyCode = KeyCodes.KEYCODE_BACK then
	 if sm.ayamenobazee then
	 	 sm.hide
	 else
	 	 pasokh = Msgbox2("exit?","exit message","yes","","no",Null)
	 	 if pasokh = DialogResponse.POSITIVE then
	 	 	 ExitApplication
	 	 end if
	 end if
	 return true
else
	 return false
end if
لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...