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

گرفتن سرویس در حال اجرا (سرویس)


ali mo

سوال

سلام  و درود دوستان

اقا من می خوام لیست اپ های در حال اجرا بگیرم یعنی اپ های که تو سرویس بک گراند کار می کنن

تصویر زیر ببنید (پیوست) 

این کد رو نمی خوام که فقط اپ های باز بر می گردونه

Sub getRunningApp(sPackageName As String) As String
	Dim o As OperatingSystem
	Dim tasks As List = o.getRecentTasks(10, 0)
	For Each task As Object In tasks
		Dim r As Reflector
		r.Target = task
		Dim bi As Object = r.GetField("baseIntent")
		If bi <> Null Then
			r.Target = bi
			r.Target = r.RunMethod("getComponent")
			Log(r.RunMethod("getPackageName"))
'			If r.RunMethod("getPackageName") = sPackageName Then
'				Dim Status As String
'				Status = "Successful"
'				Return Status
'			Else
'				Return "Null"
'			End If
		End If
	Next
End Sub

اگر دوستی می دونه  ممنون میشم بگه

Capture.PNG

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

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

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

در در 7 مهر 1398 در 23:38، alimo1999 گفته است :

سلام  و درود دوستان

اقا من می خوام لیست اپ های در حال اجرا بگیرم یعنی اپ های که تو سرویس بک گراند کار می کنن

تصویر زیر ببنید (پیوست) 

این کد رو نمی خوام که فقط اپ های باز بر می گردونه

اگر دوستی می دونه  ممنون میشم بگه

 

از کتابخونه زیر استفاده کنید عزیز.

 

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

بایگانی شده

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

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

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