• اطلاعیه ها

    • H@mid.RS

      جذب نیرو   پنجشنبه, 10 فروردین 1396

      درود به دوستان عزیز به چند نفر مدیر برای بخش های php و گرافیک نیازمندیم درصورت تمایل درخواست خود را در پیام خصوصی بفرستید  
    • H@mid.RS

      تغییر نام کاربری   دوشنبه, 28 فروردین 1396

      درود دوستانی که نام کاربری انها با ایمل شان یکی بود تغییر کرد مثلا نام کاربری sss@tmail.com به sss تغییر کرد دوستانی که مشکل ورود دارند @ به بعد را پاک کنند
    • H@mid.RS

      کسب درآمد   پنجشنبه, 31 فروردین 1396

      دوستانی که میخواهند با انجمن خودشون همکاری کنند و از محیط انجمن درآمد کسب کنند به بنده پیام خصوصی بفرستند
    • H@mid.RS

      راه اندازی وبلاگ برای انجمن   دوشنبه, 18 اردیبهشت 1396

      درود به همه دوستان عزیز از این پس کاربران ویژه  - همکاران - و مدیران میتوانند در انجمن برای خود وبلاگ بسازند
  • 0
H4N90V3R

دریافت تصویر از اینترنت

سوال

سلام

توی برنامه ایمیج ویو گذاشتم

حالا میخوام به اون ایمیج ویو  لینک یه تصویر رو بدم و داخل اون ایمیج ویو تصویر رو نمایش بده

ممنون میشم راهنمایی کنید

به اشتراک گذاری این ارسال


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

6 پاسخ به این سوال تا کنون داده شده است

  • 0

ببینید منظورتون این سورس کده دانلود



Sub Globals
Dim ImageView3 As ImageView
Dim ImageView2 As ImageView
Dim ImageView1 As ImageView
Dim ImageView4 As ImageView
End Sub

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
End Sub

Sub Activity_Resume
Dim links As Map
links.Initialize
links.Put(ImageView1, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
links.Put(ImageView2, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
links.Put(ImageView3, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
links.Put(ImageView4, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
CallSubDelayed2(ImageDownloader, "Download", links)
End Sub

Sub Activity_Pause (UserClosed As Boolean)
CallSub(ImageDownloader, "ActivityIsPaused")
End Sub 

اینم اسکرین شات 


sd.png


پسند شده توسط H4N90V3R، H@mid.RS و ali.1020

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

سلام دوست عزیز  :give_rose: 


متاسفانه راهی برای نمایش عکس به شکل کاملا آنلاین نیست


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


با کتابخانه HttpUtils2



Dim Job1 As HttpJob
Job1.Initialize("Job1",Me)
Job1.Download("Url")


بعد یه ساب مینویسید :mail1: 



Sub JobDone (Job As HttpJob)
Img1.SetBackgroundImage(Job.GetBitmap)
End Sub

پایان :lol: 


لازم به ذکر است بجای url آدرس عکس


و بجای Img1 ایمج ویوتون رو قرار بدید :bye2: 


پسند شده توسط H@mid.RS و H4N90V3R

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

 

ببینید منظورتون این سورس کده دانلود

Sub Globals
	Dim ImageView3 As ImageView
	Dim ImageView2 As ImageView
	Dim ImageView1 As ImageView
	Dim ImageView4 As ImageView
End Sub

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("1")
End Sub

Sub Activity_Resume
	Dim links As Map
	links.Initialize
	links.Put(ImageView1, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
	links.Put(ImageView2, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
	links.Put(ImageView3, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
	links.Put(ImageView4, "http://basic4x.ir/uploads/profile/photo-1.png?_r=1462867019")
	CallSubDelayed2(ImageDownloader, "Download", links)
End Sub

Sub Activity_Pause (UserClosed As Boolean)
	CallSub(ImageDownloader, "ActivityIsPaused")
End Sub 

عه پس اینجوری هم میشه :pardon: 

(حالا دیدم)

پسند شده توسط H4N90V3R

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

سلام

توی برنامه ایمیج ویو گذاشتم

حالا میخوام به اون ایمیج ویو  لینک یه تصویر رو بدم و داخل اون ایمیج ویو تصویر رو نمایش بده

ممنون میشم راهنمایی کنید

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

Dim pica As Picasso
	
pica.Initialize
	
pica.LoadUrl(cur1.GetString("link")).IntoImageView(imgdo)

ولی اگر دانلود هم میخاید دوستان گفتند 

پسند شده توسط H@mid.RS، m007moh، Ho3ien و 1 کاربر دیگر

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

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

Dim pica As Picasso
	
pica.Initialize
	
pica.LoadUrl(cur1.GetString("link")).IntoImageView(imgdo)

ولی اگر دانلود هم میخاید دوستان گفتند 

cur1 As ???

پسند شده توسط H4N90V3R

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

 

cur1 As ???

 

شرمنده یادم رقت بگم cur1 کروسر که برای sql 

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

اگر نه که کلا خود لینک رو به جاش مینویسی 

اینجوری 

Dim pica As Picasso
	
pica.Initialize
	
pica.LoadUrl(http://s6.picofile.com/file/8253809476/Untitled_1.jpg).IntoImageView(imgdo)

اون imgdo هم خود ایمیج ویو شما است 

سولی بود در خدمتم

پسند شده توسط H4N90V3R، H@mid.RS و Ho3ien

به اشتراک گذاری این ارسال


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

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

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

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !


ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید


ورود به حساب کاربری