[sepidpor]

خیلی گشتم راه حلی پیدا نکردم
ولی خودم تونستم از یه روش استفاده کنم که براتون می زارم

روی دکمه یا عکسی که می خواید از برنامه به کل خارج بشه این کد رو می نویسید

Sub imghome_click
File.OpenOutput  (File.DirInternal , "khoroj.txt", False)
File.WriteString (File.DirInternal , "khoroj.txt", "khoroj")
Activity.Finish
End Sub

داخل تمام resume های اکتیویتی های قبل این کد رو بنویسید

Sub Activity_Resume
If File.Exists (File.DirInternal , "khoroj.txt")= True Then
If File.GetText (File.DirInternal , "khoroj.txt")= "khoroj" Then
Activity.Finish
End If
End If
End Sub

و در آخر داخل activity main داخل resume می تونید دو حالت بزارید که خیلی به کارتون ممکنه بیاد

حالت اول برای خروج کامل از برنامه

Sub Activity_Resume
If File.Exists (File.DirInternal , "khoroj.txt")= True Then
If File.GetText (File.DirInternal , "khoroj.txt")= "khoroj" Then
File.Delete (File.DirInternal , "khoroj.txt")
activity.finish
End If
End If
End Sub

حالت دوم برای اینکه خروج نکنه و اکتیویتی main رو نشون بده این کارو بکنید دکمه خروج تبدیل می شه به دکمه home یا مشاهده صفحه نخستتون

Sub Activity_Resume
If File.Exists (File.DirInternal , "khoroj.txt")= True Then
If File.GetText (File.DirInternal , "khoroj.txt")= "khoroj" Then
File.Delete (File.DirInternal , "khoroj.txt")
End If
End If

End Sub

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