تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكله بالبكيتشر بووكس
#1
لدي علي الفورم كما هو موضح بيكتشر بوكس يستقبل صوره من خلال رابط مباشر لكن عند اسقبال الصوره تظهر هكذا مع العلم جوده الانترنت لدي عاليه جداااا

ما السبب وكيف اتغلب علي ذلك
الرد }}}
تم الشكر بواسطة: سعود
#2
يمكن رابط الصورة غير مباشر
لو تضيف الرابط اللي تستخدمه عشان اجرب

الرد }}}
#3
(01-01-21, 05:52 AM)معاند الحظ كتب : يمكن رابط الصورة غير مباشر
لو تضيف الرابط اللي تستخدمه عشان اجرب

هذا هو الرابط ولكن حليت المشكله عن طريق 
https://h.top4top.io/p_1826gwh211.jpg
كود :
Dim WC As New WebClient
           Dim BYTES() As Byte = WC.DownloadData(my_link_img)
           Dim IMGSTREAM As New MemoryStream(BYTES)
           pic_my_img_support.Image = Image.FromStream(IMGSTREAM)
الرد }}}
تم الشكر بواسطة: ابو روضة , سعود , ابراهيم ايبو
#4
(01-01-21, 07:04 AM)اليوم السابع كتب :
(01-01-21, 05:52 AM)معاند الحظ كتب : يمكن رابط الصورة غير مباشر
لو تضيف الرابط اللي تستخدمه عشان اجرب

هذا هو الرابط ولكن حليت المشكله عن طريق 
https://h.top4top.io/p_1826gwh211.jpg
كود :
Dim WC As New WebClient
           Dim BYTES() As Byte = WC.DownloadData(my_link_img)
           Dim IMGSTREAM As New MemoryStream(BYTES)
           pic_my_img_support.Image = Image.FromStream(IMGSTREAM)

بسم الله ما شاء الله أخى اليوم السابع مستواك فى تحسن , ربنا يعينك...

هذا كود أيضاً

كود :
 Dim tClient As WebClient = New WebClient
       Dim tImage As Bitmap = Bitmap.FromStream(New MemoryStream(tClient.DownloadData("ضع هنا رابط الصورة المباشر")))
       PictureBox1.Image = tImage
الرد }}}
#5
(01-01-21, 07:25 AM)ابو روضة كتب :
(01-01-21, 07:04 AM)اليوم السابع كتب :
(01-01-21, 05:52 AM)معاند الحظ كتب : يمكن رابط الصورة غير مباشر
لو تضيف الرابط اللي تستخدمه عشان اجرب

هذا هو الرابط ولكن حليت المشكله عن طريق 
https://h.top4top.io/p_1826gwh211.jpg
كود :
Dim WC As New WebClient
           Dim BYTES() As Byte = WC.DownloadData(my_link_img)
           Dim IMGSTREAM As New MemoryStream(BYTES)
           pic_my_img_support.Image = Image.FromStream(IMGSTREAM)

بسم الله ما شاء الله أخى اليوم السابع مستواك فى تحسن , ربنا يعينك...

هذا كود أيضاً

كود :
 Dim tClient As WebClient = New WebClient
       Dim tImage As Bitmap = Bitmap.FromStream(New MemoryStream(tClient.DownloadData("ضع هنا رابط الصورة المباشر")))
       PictureBox1.Image = tImage

والله يا ابو روضه انا بتعلم منك يا اخي و من الاخ سعود و من الاخ عاصم و من الاخ معاند حظ وانتم بجد سبب في تعلمي اي شئ
الرد }}}
تم الشكر بواسطة: ابو روضة , ابو روضة , ابراهيم ايبو



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم