نمایش قسمت های مختلف گوشی

[MR.B4A 126]

سلام

میخواستم بدونم دستورات مربوط به باز کردن قسمت های مختلف گوشی چیه؟

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

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

[Salar82 919]

سلام

چیزهایی رو که بلد بودم رو نوشتم.

خدمت شما

 

رویداد باز کردن صفحه اس ام اس:

Sub SendSms(PhoneNumber As String, Text As String)
	Dim In As Intent
	In.Initialize(In.ACTION_VIEW, "sms:" & PhoneNumber)
	In.PutExtra("sms_body", Text)
	StartActivity(In)
End Sub

phoneNumber شماره تلفن مخاطبه

Text هم متن پیامه.

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

رویداد باز کردن عکس با گالری(البته آدرسی که میدید نباید تو DirInternal یا DirAssets باشه.)

PicAdress آدرس عکسه و

FileName هم اسم عکستونه.

Sub Open Gallery(PicAdress As String , FileName As String)
  Dim In As Intent
  Dim AD As String
  
  AD = "file://" PicAdress & "/" & FileName

  In.Initialize(In.ACTION_VIEW , AD)
  In.SetType("image/jpeg")
  StartActivity(In)
End Sub

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

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

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

این کد باز کردن دوربین گوشی

Dim In As Intent
In.Initialize("android.media.action.IMAGE_CAPTURE", "")   
StartActivity(In)

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

با تیک زدن کتابخونه Phone و تعریف یه متغیر از نوع PhoneIntent میتونید:

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

Dim p As PhoneIntents
StartActivity(P.OpenBrowser("http://www.google.com"))
StartActivity(p.PlayAudio(File.DirAssets , "SomeName.mp3"))
StartActivity(p.PlayVideo(File.DirAssets , "SomeName.mp4"))

 

 

[MR.B4A 126]

30 minutes ago, Salar82 said:

سلام

چیزهایی رو که بلد بودم رو نوشتم.

خدمت شما

 

رویداد باز کردن صفحه اس ام اس:

Sub SendSms(PhoneNumber As String, Text As String)
	Dim In As Intent
	In.Initialize(In.ACTION_VIEW, "sms:" & PhoneNumber)
	In.PutExtra("sms_body", Text)
	StartActivity(In)
End Sub

phoneNumber شماره تلفن مخاطبه

Text هم متن پیامه.

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

رویداد باز کردن عکس با گالری(البته آدرسی که میدید نباید تو DirInternal یا DirAssets باشه.)

PicAdress آدرس عکسه و

FileName هم اسم عکستونه.

Sub Open Gallery(PicAdress As String , FileName As String)
  Dim In As Intent
  Dim AD As String
  
  AD = "file://" PicAdress & "/" & FileName

  In.Initialize(In.ACTION_VIEW , AD)
  In.SetType("image/jpeg")
  StartActivity(In)
End Sub

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

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

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

این کد باز کردن دوربین گوشی

Dim In As Intent
In.Initialize("android.media.action.IMAGE_CAPTURE", "")   
StartActivity(In)

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

با تیک زدن کتابخونه Phone و تعریف یه متغیر از نوع PhoneIntent میتونید:

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

Dim p As PhoneIntents
StartActivity(P.OpenBrowser("http://www.google.com"))
StartActivity(p.PlayAudio(File.DirAssets , "SomeName.mp3"))
StartActivity(p.PlayVideo(File.DirAssets , "SomeName.mp4"))

 

 

آقا خیلی ممنون از جوابت. این خیلی کاربردیه

منتها منظور من از مثلا باز کردن پیام ها اینه که مسیجینگ خود گوشی رو باز کنه یا مثلا بازکردن بخش تنظیمات یا ستینگ گوشی.

این مدل دستور