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

  روشن نگه داشتن صفحه گوشی در بیسیک فور اندروید

با عرض سلام خدمت شما دوستان و همراهان عزیز !

شاید در اپلیکیشن های زیادی مشاهده کرده باشید که در برخی از بخش های آنها صفحه گوشی به هیچ عنوان خاموش نمیشود ( مثلا صفحه پخش فیلم یا صفحه مطالعه متن و … ) برای اینکه بتوانید این قابلیت را در برنامه خودتان پیاده سازی کنید کافیست کتابخانه Phone را فعال کنید و کد زیر را به اکتیویتی مورد نظرتان اضافه کنید :

Dim ph As PhoneWakeState
ph.KeepAlive(True)

به همین سادگی , صفحه گوشی در اکتیویتی مورد نظر شما روشن می ماند و برای غیر فعال کردن این دستور کافیست که مقدار True را به False تغییر دهید :

ph.KeepAlive(False)

در پایان امیدواریم که این مطلب هم مورد استفاده شما عزیزان قرار گرفته باشد ….
موفق باشید !

ما را در تلگرام دنبال کنید !
BasicLearn@

درباره نویسنده

حامد باقری

برنامه نویس اندروید , طراح وب , طراح گرافیک و رابط کاربری
( مدیر مجموعه بیسیک لرن )
www.HamedBagheri.ir

۲ نظر

  • سلام خسته نباشید.
    من واسه فعال و غیرفعال کردن این حالت از دو دکمه با نام on و off استفاده کردم که روی هم قرار دارند و دکمه on رو پنهان کردم. حالا با استفاده از آموزش شما حالت روشن نگه داشتن صفحه رو فعال و غیر فعال می کنم و به خوبی هم کار می کنه اما مشکل اینجاست که ذخیره نمیشه.
    لطفاً راهنمایی کنید که چطور میشه این مقدار رو ذخیره کرد که با خارج شدن از برنامه این حالت فعال یا غیرفعال بمونه. تشکر

    • سلام . روش های زیادی برای ذخیره اطلاعات برنامه وجود داره ( مثلا ذخیره در فایل متنی , ذخیره در دیتابیس , استفاده از PreferenceActivity و … ) ساده ترین راه اینه که یک فایل متنی ایجاد کنید و مقدار on یا off را داخل فایل متنی ذخیره کنید . در ابتدا چک میکنید که اگر فایل از قبل وجود نداره , برنامه فایل را ایجاد کنه و مقدار off را به صورت پیشفرض داخل فایل تنظیم کنه :
      If File.Exists(File.DirInternal,"Settings.txt") = False Then
      File.WriteString(File.DirInternal,"Settings.txt","off")
      End If

      در بخش Activity_Create هم با استفاده از دستورات شرطی بررسی میکنید که اگر مثلا فایل متنی روی on تنظیم شده بود صفحه گوشی را روشن نگه داره :
      Dim ph As PhoneWakeState
      If File.ReadString(File.DirInternal,"Settings.txt") = "on" Then
      ph.KeepAlive(True)
      End If

      و در رویداد مربوط به کلیک دکمه هم مجددا از دستورات شرطی استفاده میکنید که با هر بار کلیک , مقدار on یا off داخل فایل متنی ذخیره بشه :
      If File.ReadString(File.DirInternal,"Settings.txt") = "on" Then
      ' غیر فعال کردن
      File.WriteString(File.DirInternal,"Settings.txt","off")
      Else
      ' فعال کردن
      File.WriteString(File.DirInternal,"Settings.txt","on")
      End If

      موفق باشید .

نظر بدهید

این سایت از اکیسمت برای کاهش هرزنامه استفاده می کند. بیاموزید که چگونه اطلاعات دیدگاه های شما پردازش می‌شوند.