گزاشتن تصویر به عنوان پس زمینه

[stnima 11]

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

Sub share1_Click
	File.Copy (File.DirAssets ,axnow&".jpg",File.DirRootExternal ,"/علی/"&"علی"&" "&axnow&".jpg")
Dim r As Reflector
Dim f As Object
f = r.CreateObject2("java.lang.String", Array As Object("file:///sdcard/علی/"&"علی"&" "&axnow&".jpg"), Array As String("java.lang.String"))
Dim share As Intent
share.Initialize(share.ACTION_SEND,"")
share.SetType("image/*")
share.PutExtra("android.intent.extra.STREAM", r.RunStaticMethod("android.net.Uri", "parse", _
	    Array As Object(f), Array As String("java.lang.String")))
share.WrapAsIntentChooser("ارسال ... !")
StartActivity(share)
End Sub 

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

لطفا راهنمایی کنید 

با تشکر

[shahab.es 5,429]

سلام

کتابخونه Reflection رو تیک بزنید

این تابع رو یه جا قرار بدید

Sub SetWallPaper(Bmp As Bitmap)
   Dim r As Reflector
   r.Target = r.RunStaticMethod("android.app.WallpaperManager", "getInstance", _
      Array As Object(r.GetContext), Array As String("android.content.Context"))
   r.RunMethod4("setBitmap", Array As Object(Bmp), Array As String("android.graphics.Bitmap"))
End Sub 

به این شکل هم استفاده کنید...

SetWallPaper(LoadBitmap(File.DirAssets, "test.jpg"))

[stnima 11]

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

با تشکر