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

[mahdi tahan 723]

با سلام

 

من یک عکس رو با ایمیج ویو ست میکنم.(عکس رو دانلود میکنم و ست میکنمش)

 

حالا میخوام اون عکس دانلود شده اشتراک گذاری کنمش.

 

1-اگر نیاز به ذخیره نیست چطوری میش؟

 

2-اگر باید ذخیره بش چطوری عکسی که با پیکاسو دانلود شده رو ذخیره کنم؟

 

پیشاپیش ممنون

[Nemesis 1,846]

حالا میخوام اون عکس دانلود شده اشتراک گذاری کنمش.

Sub Activity_Pause (UserClosed As Boolean)
	File.Delete(File.DirRootExternal, "1.jpg")
End Sub

Sub Button1_Click
	Dim b As Bitmap = ImageView1.Bitmap
	Dim out As OutputStream
	Dim ar As AriaLib
    out = File.OpenOutput(File.DirRootExternal, "1.jpg", False)
    b.WriteToStream(out, 100, "JPEG")
	out.Close
	add = "File://"&File.Combine(File.DirRootExternal, "1.jpg")
	StartActivity(ar.ShareFile(add,"Image/JPEG","ارسال فایل"))

End Sub

موفق باشی

[mface 25]

Sub Activity_Pause (UserClosed As Boolean)
	File.Delete(File.DirRootExternal, "1.jpg")
End Sub

Sub Button1_Click
	Dim b As Bitmap = ImageView1.Bitmap
	Dim out As OutputStream
	Dim ar As AriaLib
    out = File.OpenOutput(File.DirRootExternal, "1.jpg", False)
    b.WriteToStream(out, 100, "JPEG")
	out.Close
	add = "File://"&File.Combine(File.DirRootExternal, "1.jpg")
	StartActivity(ar.ShareFile(add,"Image/JPEG","ارسال فایل"))

End Sub

موفق باشی

 

سلام عزیز من از آریا گالری استفاده میکنم با پیکاسو دان میکنم داخل list نمایش میدم چه تغییراتی باید داخلش بدم اگه میشه راهنمایی کنید دوست عزیزتشگر

[alimo 138]

سلام

 

با کتابخونه arialib می تونی این کار انجام بدی

Dim ar As AriaLib
ar.SharePic(File.DirAssets,"ادرس عکس","send")

[mahdi tahan 723]

منظورت از آدرس عکس چیه؟لینک عکس؟

[alimo 138]

منظورت از آدرس عکس چیه؟لینک عکس؟

آدرسی که فایل دانلود شده اونجاست!

[mahdi tahan 723]

عزیز هیج جایی ذخیره نیست.مستفیم با پیکاسو به ایمیج ویو پیوست شده

[mahdi tahan 723]

میش یک توضیحی بدی.

1.jpg  چیه؟

باید تغییرش بدم؟

[Nemesis 1,846]

JPG فرمت تصویرت هست دیگه
میتونی از فرمت تصویر مورد نیازت استفاده کنی