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

در خواست رهنمایی جهت کلید playوpuseدر روی یک دکمه


siroos12

سوال

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

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

سلام علیکم،دوستان میشه منو راهنمایی کنید،که چطور ی دکمه باشه که با زدن playآهنگ پخش بشه و با زدن همون دکمه puse??????

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

بفرما

 

اول یه موزیک به برنامه اضافه می کنیم بعد

Sub Globals
Dim MediaPlayer1 As MediaPlayer
End Sub
Sub Activity_Create(FirstTime As Boolean) 

MediaPlayer1.Initialize( )
		MediaPlayer1.Load(File.DirAssets, "esmemozic.MP3")

End Sub
Sub Button1_Click
    If (MediaPlayer1.IsPlaying) Then
	    MediaPlayer1.Pause
	   Button1.SetBackgroundImage(LoadBitmap(File.DirAssets,"play.png"))
    Else
	    MediaPlayer1.Play
		Button1.SetBackgroundImage(LoadBitmap(File.DirAssets,"pause.png"))
	End If
End Sub
لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

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

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

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