کنترل دکمه برگت موبایل

[1messi 11]

وقتی دکمه برگشت موبایل ( یعنی همان دکمه کنار home) رو میزنم ، از نرم افزار خارج میشه . چه جوری میشه دکمه روکنترل کرد .

[محمدرضا معتمدی 612]

اگه میخای کلا وقتی دکمه بک رو زد خارج نشه از برنامه فک کنم این باشه

 

تست نکردم !

Sub Activity_KeyPress (KeyCode As Int) As Boolean
 If KeyCode = KeyCodes.KEYCODE_BACK Then
Return True
     End If
End Sub

کلا جای return True

 

هر کدی بزاری با زدن دکمه ی بک انجام میشه

 

و میتونی کلا کنترلش کنی

[MahdiHD 1,748]

یه کد برات می زارم که وقتی کاربر رو دکمه back گوشی کلیک کرد یه پیغام بیاد که وسطش یه عکس دلخواه باشه متنش باشه : آیا می خواهید خارج شوید؟ بعد سه تا گزینه داشته باشه بله خیر ارسال نظر امتیاز دکمه های بله و خیر معلومه ولی وقتی کاربر روی دکمه ارسال نظر کلیک کرد صفحه کوچیک نظردهی بازار باز بشه فقط به جای khoroj.png عکس مورد نظرت و به جای haku.kasbvakar نام پکیج برنامه رو بنویس

Sub Activity_KeyPress (KeyCode As Int) As Boolean
If KeyCode = KeyCodes.KEYCODE_BACK Then
Dim ret,ret1,ret2,ret3 As Int
Dim cd As CustomDialog
    Dim pnl As Panel
    Dim bd As Bitmap
    bd.Initialize(File.DirAssets, "khoroj.png")
    pnl.Initialize("pnl")
    pnl.SetBackgroundImage(bd)
    ret1 = DialogResponse.POSITIVE
    ret2=DialogResponse.CANCEL
    ret3 = DialogResponse.NEGATIVE
cd.AddView(pnl, 0, 0, 93%x, 60%x)
    ret = cd.Show("آیا قصد خروج دارید؟", "بله", "ارسال نظر و امتیاز","خیر", Null)    
    If ret=ret1 Then
    ExitApplication
    Return True
    End If
    If ret=ret3 Then
    Return True
    End If
    If ret=ret2 Then
Try        
     Dim market As Intent, uri As String
uri="bazaar://details?id=haku.kasbvakar"        
market.Initialize(market.ACTION_EDIT,uri)
StartActivity(market)
Catch
ToastMessageShow("لطفا ابتدا برنامه بازار را نصب کنید", False)             
End Try
    Return True
    End If
    End If
End Sub

راستی این رو بزار توصفحه اول برنامه (بعد اسپلش) دیگه جای دیگه ای نزارش.