تغییر تصویر پس زمینه

[pmtweb 38]

سلام من یه کد میخوام که یک تصویر رو به عنوان پس زمینه انتخاب کنه

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

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

	i=Msgbox2("?بله","خیر","آیا این تصویر به عنوان پس زمینه انتخاب شود","",LoadBitmap(File.DirAssets,"&axnow&".jpg"))
	If i=DialogResponse.POSITIVE Then
	ToastMessageShow("به عنوان پس زمینه تنظیم شد", False)
	Return ss.setWallpaper(sbitmap)
	End If
	

کمکم کنید ممنون

[محمدرضا معتمدی 612]

برادر لطفا جستجو کن فقط 30 ثانیه وقت میبره

 

http://answercenter.ir/topic/2637-%D8%AA%D8%BA%DB%8C%DB%8C%D8%B1-%D8%AA%D8%B5%D9%88%DB%8C%D8%B1-%D8%B2%D9%85%DB%8C%D9%86%D9%87/

[dlshad 0]

عالیه - دمت گرم من استفاده کردم درست بود

[hamedanary6513 1]

سلا

 

خدمت شما : 

Sub Globals
    Dim st As StudentLibrary
End Sub

Sub Activity_Create(FirstTime As Boolean)
st.setWallpaper(LoadBitmap(File.DirAssets, "test.jpg"))
End Sub

این کد میاد وقتی که برنامه باز شد تصویر test.jpg رو در DirAssets بر میداره و به عنوان تصویر زمینه قرار میده.

 

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

RemovePermission(android.permission.READ_PHONE_STATE)
RemovePermission(android.permission.INTERNET)
RemovePermission(android.permission.ACCESS_FINE_LOCATION)

موفق و پیروز باشید.

م من از این کد استفاده میکنم ولی به مشکل میخورم .متغییر که تعریف میکنم نمیتنم بنویسم dim st as student library چون گزینه بندیش کردن و باید بنویسم dim st as studentimage که به همین قسمت گیر میده .برنامه کامپایل میشه ولی وقتی داخل برنامه میزنم روی تنظیم به پس زمینه از برنامه میپره بیرون

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

ممنون مبیشم یکی کمکم کنه سه روزه حیرنم و هر جور کدی استفاده میکنم یه جاش مشکل پیدا میکنه

[pmtweb 38]

	Dim ss As StudentLibrary

 LoadBitmap(File.DirAssets,"1.jpg")
Return ss.setWallpaper (sbitmap)

این کد روی عبارت (sbitmap) خطا میده نمیدونم چکار باید می کردم که نکردم کل مشکل من همینه کمک کنید دیگه

[پژمان نیکروان 6,055]

	Dim ss As StudentLibrary

 LoadBitmap(File.DirAssets,"1.jpg")
Return ss.setWallpaper (sbitmap)

این کد روی عبارت (sbitmap) خطا میده نمیدونم چکار باید می کردم که نکردم کل مشکل من همینه کمک کنید دیگه

 

حالا شما میخواین چیکار کنید؟؟

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

 

باید حتما موقع گذاشتن تصویر زمینه ، عکس رو اول کپی کنید به DirRootExternal ، یا Internal

یعنی عکس رو از DirAsset نمیتونه پس زمینه بذاره.

[pmtweb 38]

حالا شما میخواین چیکار کنید؟؟

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

 

باید حتما موقع گذاشتن تصویر زمینه ، عکس رو اول کپی کنید به DirRootExternal ، یا Internal

یعنی عکس رو از DirAsset نمیتونه پس زمینه بذاره.

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

از قبل ذخیره میکنم عکس رو ولی الان یه مشکل دیگست گفتم که 

روعبارت sbitmap خطا میده (قبل از کامپایل منظورمه ها توی محیط بیسیک اشتباه نشه که فکر کنید تو خود برنامه خطا میده هاا)

[Alireza.Ghafari 2,104]

خدمت شما : 

Sub Globals
    Dim st As StudentLibrary
End Sub

Sub Activity_Create(FirstTime As Boolean)
st.setWallpaper(LoadBitmap(File.DirAssets, "test.jpg"))
End Sub

این کد میاد وقتی که برنامه باز شد تصویر test.jpg رو در DirAssets بر میداره و به عنوان تصویر زمینه قرار میده.

 

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

RemovePermission(android.permission.READ_PHONE_STATE)
RemovePermission(android.permission.INTERNET)
RemovePermission(android.permission.ACCESS_FINE_LOCATION)

موفق و پیروز باشید.