مشکل با دانلود چندین عکس با کتابخانه Picasso

[Crashday 47]

سلام،

دوستان من یک Panel دارم که داخلش یک Imageview هست،میخوام با استفاده از کتابخانه Picasso چندین عکس رو دانلود کنم و بعد با استفاده از کتابخانه Arialib اون ها رو دایره ای کنم و در نهایت بر روی ImageView نمایش بدم،کدهای من فقط عکس آخر رو دانلود میکنه،نمیدونم چرا؟

اگه ممکنه یه نگاه بندازین ببینید کجا رو اشتباه کردم،مرسی:

کد درخواست دانلود عکس:

Dim Target1 As DefaultTarget
Target1.Initialize("Target1", "MyTag")
Dim dl As Picasso
dl.Initialize
dl.LoadUrl("http://...../" & M.Get("picname") & ".jpg").Resize(ImgPic.Width,ImgPic.Height).Fetch(Target1)

 

از این کد هم برای گرفتن پاسخ استفاده می کنم:

 

Sub Target1_Success(Bitmap1 As Bitmap, Tag As Object)
	Dim a As AriaPhotoshp
	ImgPic.Bitmap=a.GetCircleBitmap(Bitmap1)
End Sub

 

اگه ممکنه بفرمایید چرا فقط عکس آخر رو میگیره،ممنون

[میلاد حائری 180]

در در 1396/02/27, 07:12:08، Crashday گفته است :

سلام،

دوستان من یک Panel دارم که داخلش یک Imageview هست،میخوام با استفاده از کتابخانه Picasso چندین عکس رو دانلود کنم و بعد با استفاده از کتابخانه Arialib اون ها رو دایره ای کنم و در نهایت بر روی ImageView نمایش بدم،کدهای من فقط عکس آخر رو دانلود میکنه،نمیدونم چرا؟

اگه ممکنه یه نگاه بندازین ببینید کجا رو اشتباه کردم،مرسی:

کد درخواست دانلود عکس:

Dim Target1 As DefaultTarget
Target1.Initialize("Target1", "MyTag")
Dim dl As Picasso
dl.Initialize
dl.LoadUrl("http://...../" & M.Get("picname") & ".jpg").Resize(ImgPic.Width,ImgPic.Height).Fetch(Target1)

 

از این کد هم برای گرفتن پاسخ استفاده می کنم:

 

Sub Target1_Success(Bitmap1 As Bitmap, Tag As Object)
	Dim a As AriaPhotoshp
	ImgPic.Bitmap=a.GetCircleBitmap(Bitmap1)
End Sub

 

اگه ممکنه بفرمایید چرا فقط عکس آخر رو میگیره،ممنون

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

[میلاد 441]

در در 1396/02/27, 18:42:08، Crashday گفته است :

سلام،

دوستان من یک Panel دارم که داخلش یک Imageview هست،میخوام با استفاده از کتابخانه Picasso چندین عکس رو دانلود کنم و بعد با استفاده از کتابخانه Arialib اون ها رو دایره ای کنم و در نهایت بر روی ImageView نمایش بدم،کدهای من فقط عکس آخر رو دانلود میکنه،نمیدونم چرا؟

اگه ممکنه یه نگاه بندازین ببینید کجا رو اشتباه کردم،مرسی:

کد درخواست دانلود عکس:

Dim Target1 As DefaultTarget
Target1.Initialize("Target1", "MyTag")
Dim dl As Picasso
dl.Initialize
dl.LoadUrl("http://...../" & M.Get("picname") & ".jpg").Resize(ImgPic.Width,ImgPic.Height).Fetch(Target1)

 

از این کد هم برای گرفتن پاسخ استفاده می کنم:

 

Sub Target1_Success(Bitmap1 As Bitmap, Tag As Object)
	Dim a As AriaPhotoshp
	ImgPic.Bitmap=a.GetCircleBitmap(Bitmap1)
End Sub

 

اگه ممکنه بفرمایید چرا فقط عکس آخر رو میگیره،ممنون

درود

حتما کد دنلود عکس رو درون حلقه قرار نداده اید / 

[Crashday 47]

در 23 ساعت قبل، میلاد گفته است :

درود

حتما کد دنلود عکس رو درون حلقه قرار نداده اید / 

چرا درون حلقه قرار گرفته اما فقط عکس اخر رو دانلود میکنه...

فکر کنم قسمت تگ باید دستکاری بشه..

در 23 ساعت قبل، میلاد حائری گفته است :

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

همین کدی که گذاشتم هست عزیز،

تمام سورس نزدیک 500 خط کد هست،شما کدوم قسمت رو میخوای ؟

[میلاد حائری 180]

در 4 ساعت قبل، Crashday گفته است :

چرا درون حلقه قرار گرفته اما فقط عکس اخر رو دانلود میکنه...

فکر کنم قسمت تگ باید دستکاری بشه..

همین کدی که گذاشتم هست عزیز،

تمام سورس نزدیک 500 خط کد هست،شما کدوم قسمت رو میخوای ؟

اون قسمتی که توی حلقس و ادرس عکسا توشه

[Crashday 47]

در 2 ساعت قبل، میلاد حائری گفته است :

اون قسمتی که توی حلقس و ادرس عکسا توشه

اینو که گذاشتم،شما یه حلقه For میزاری به تعداد عکس هایی که باید دانلود بشن،داخل حلقه این کد رو میزاری تا عکس ها دانلود بشن (آدرس عکس ها رو باید به صورت Json از سمت سرور بفرستی و اینجا بخونی):

Dim Target1 As DefaultTarget
Target1.Initialize("Target1", "MyTag")
Dim dl As Picasso
dl.Initialize
dl.LoadUrl("http://...../" & M.Get("picname") & ".jpg").Resize(ImgPic.Width,ImgPic.Height).Fetch(Target1)

 

حالا این کد رو هرجای برنامه که میخوای بزار،هر عکس که با موفقیت دانلود بشه این کد اجرا میشه:

Sub Target1_Success(Bitmap1 As Bitmap, Tag As Object)
	Dim a As AriaPhotoshp
	ImgPic.Bitmap=a.GetCircleBitmap(Bitmap1)
End Sub

 

چیز دیگه ای نیست،

[میلاد 441]

در 2 ساعت قبل، Crashday گفته است :

اینو که گذاشتم،شما یه حلقه For میزاری به تعداد عکس هایی که باید دانلود بشن،داخل حلقه این کد رو میزاری تا عکس ها دانلود بشن (آدرس عکس ها رو باید به صورت Json از سمت سرور بفرستی و اینجا بخونی):

Dim Target1 As DefaultTarget
Target1.Initialize("Target1", "MyTag")
Dim dl As Picasso
dl.Initialize
dl.LoadUrl("http://...../" & M.Get("picname") & ".jpg").Resize(ImgPic.Width,ImgPic.Height).Fetch(Target1)

 

حالا این کد رو هرجای برنامه که میخوای بزار،هر عکس که با موفقیت دانلود بشه این کد اجرا میشه:

Sub Target1_Success(Bitmap1 As Bitmap, Tag As Object)
	Dim a As AriaPhotoshp
	ImgPic.Bitmap=a.GetCircleBitmap(Bitmap1)
End Sub

 

چیز دیگه ای نیست،

عزیز / یه کم بیشتر فکر کنی میبینی کدی که نوشتی با عقل جور در نمیاد / ینی هنوز شما قسمت های پروژه نوشته شدتو نمیدونی چی هستن و کارشون چیه / انتظار داری درست کار کنن

 

شما به عنوان مثال توی ثاب job done بعد از دانلود داده ها اون ها رو میریزی توی لیست یا اینکه مستقیم میفرستی روی لیست ویویت یا هر چیز دگه

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

اگر اینکه میریزی توی لیست / بیا به اندازه سایز لیست ویوت بعد از انجام دانلود داده ها یه حلقه با اندازه لیست ویوت بزن  و بازم همون کارا رو انجام بده /

شما دارید فقط اخرین داده یا اولین رو فقط دریافت میکنید 

[Crashday 47]

در 22 ساعت قبل، میلاد گفته است :

عزیز / یه کم بیشتر فکر کنی میبینی کدی که نوشتی با عقل جور در نمیاد / ینی هنوز شما قسمت های پروژه نوشته شدتو نمیدونی چی هستن و کارشون چیه / انتظار داری درست کار کنن

 

شما به عنوان مثال توی ثاب job done بعد از دانلود داده ها اون ها رو میریزی توی لیست یا اینکه مستقیم میفرستی روی لیست ویویت یا هر چیز دگه

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

اگر اینکه میریزی توی لیست / بیا به اندازه سایز لیست ویوت بعد از انجام دانلود داده ها یه حلقه با اندازه لیست ویوت بزن  و بازم همون کارا رو انجام بده /

شما دارید فقط اخرین داده یا اولین رو فقط دریافت میکنید 

 

نه اتفاقا حلقه کاملا درسته و تمام داده های متنی دریافت میشن و به لیست اضافه میشن،مشکل فقط همین قسمت عکس هست.توی Job done نمی تونم عکس رو دانلود کنم،یعنی میشه منتها چون خروجی bitmap نمیده واسه همین نمیتونم همونجا دایره ای کنمش،

اگر بخوام فقط عکس رو بگیرم و نمایش بدم اصلا مشکلی نداره،منتها من میخوام قبل از اینکه عکس رو نمایش بدم یه سری عملیات روش انجام بدم مثل دایره ای کردنش برای همین مستقیما نمیشه توی Job done این کارو کرد،مجبورم از اون کد بالا استفاده کنم.اگر نخوام کار خاصی بکنم و مستقیما عکس رو داخل imageview نشون بدم اره حرف شما درسته،کار راحتیه ولی من میخوام هر عکس رو دونه دونه به صورت bitmap بگیرم و بعد از دایره ای کردن بزارمش داخل لیست

 

کد بالا هم درخواست دانلود هر عکس رو میده،مشکل اصلی در واقع اونجایی هست که جواب گرفته میشه،به نظرم موقع دانلود هر عکس باید یه تگ منحصر به فرد به عکس داد بعد توی جوابش کار مورد نظر رو انجام داد منتها این کارو هم کردم ولی متاسفانه جواب نداد.