مشکل در بیسیک فور اندروید

سوال

سلام.

من میخام داخل یک سرویس کد پخش اجرای آهنگ رو بزارم. یعنی گوشی که روشن شد آهنگ پخش شه بدون اینکه نیاز به بازشدن نرم افزار باشه.

کد زیر رو نوشتم اما عمل نکرد:

#Region  Service Attributes 
	#StartAtBoot: false
	#StartCommandReturnValue : android.app.Service.START_STICKY
#End Region

Sub Process_Globals
	
	Dim muzic As MediaPlayer
	
End Sub

Sub Service_Create

End Sub

Sub Service_Start (StartingIntent As Intent)
	
	muzic.Initialize
	muzic.Load(File.DirAssets,"muzic1.mp3")
	muzic.Play
	
	
	Service.StopAutomaticForeground
End Sub

Sub Service_Destroy

End Sub

اگه راهنمایی کنید ممنون میشم.

در حال بررسی 0
, , , 2018-11-13T20:59:42+03:30 3 پاسخ کاربر تازه 0

پاسخ ها ( 3 )

  1. SOLTANE GHALBHA
    0
    2018-11-14T11:04:12+03:30
    پاسخ

    سلام

    من تو کد شما جایی نمی بینم که سرویس رو start کرده باشید.

    از کد زیر مطمئن نیستم، ولی امتحان کنید ببینید جوابگو هست

    • کدهای سرویس(سرویسی به نام test ایجاد کردیم)
     #Region  Service Attributes 
	#StartAtBoot: False
	#StartCommandReturnValue : android.app.Service.START_STICKY
#End Region

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.
	Dim music As MediaPlayer
End Sub

Sub Service_Create
End Sub

Sub Service_Start (StartingIntent As Intent)
	music.Initialize
	music.Load(File.DirAssets,"muzic1.mp3")
	music.Play
End Sub


Sub Service_Destroy
End Sub
    • سپس در اکتویتی Main
    #Region  Project Attributes 
	#ApplicationLabel: B4A Example
	#VersionCode: 1
	#VersionName: 
	'SupportedOrientations possible values: unspecified, landscape or portrait.
	#SupportedOrientations: unspecified
	#CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: True
#End Region

Sub Process_Globals
End Sub

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.

End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("main")
	StartService(test)
	
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

     

  2. rezac
    0
    2018-11-14T13:48:59+03:30
    پاسخ

    در اکتیویتی main که کد startservice رو بنویسم لازمه برنامه اجرا بشه تا سرویس فعال بشه.

    میخام بدون اینکه نیاز به اجرای برنامه باشه، سرویس فعال باشه و آهنگ پخش بشه

  3. rezac
    0
    2018-11-14T13:55:10+03:30
    پاسخ

    یه جورایی میشه گفت میخام یک سرویس پایدار داشته باشم

ارسال یک پاسخ