25-08-16, 11:44 PM
(آخر تعديل لهذه المشاركة : 25-08-16, 11:47 PM {2} بواسطة superawdi.
تعديل السبب: نسيت ذكر اصدار الميكروسوفت فجول
)
السلام عليكم ورحمة الله وبركاتة
اخواني اخوكم واقع في مشكلة ..
عندي قاعدة بيانات ميكروسوفت SQL ، وصنعت جدول فية عمود لحفظ الصور من نوع Image . المهم.
عملية ادخال الصور Insert شي سهل بالفجول بيسك نت ((أنا استخدم نسخة 2013 من الفجول ستوديو)) استخدمت ال Filestream و Binary Reader
كود :
(Dim FS As New FileStream(Img_loc, FileMode.Open, FileAccess.Read
(Dim BR As New BinaryReader(FS
()img = BR.ReadByte
نجي للمشكلة
|
|
الان انا مسوي دالة مسميها FillBox وعملها انو اول ما اعمل Select لل Datagridview
يعبي البيانات للحقول ..
الموضوع سهل وبسيط
كود :
Dim dt As DataTable = New DAL().Select_Adapter("ٍSelect command")
If dt.Rows.Count = 0 Then Exit Sub
lblID.Text = dt(0)(0).ToString()
txtCatName.Text = dt(0)(1).ToString()
txtCatNote.Text = dt(0)(2).ToString()
ألى هنا كل شي مضبوط
ولنفرض ان (dt(0)(2)) عبارة عن الحقل الموجود فيه الصورة في الـDataTable
اريد اعمل لها Load او اضهرها في Picturebox1
انا استخدمت عدة طرق ... لدرجة لن تتصوروها ..
المهم بحثت بكل اللغات .. والكل يجاوب نفس الشي
كالتالي
كود :
Dim ms As New MemoryStream(CType(dt(0)(3), Byte()))
PictureBox1.Image = Image.FromStream(ms)
او
كود :
Dim imgByte As Byte()
imgByte = directcast(dt(0)(3),byte())
PictureBox1.Image = Image.FromStream(New MemoryStream(imgByte))
والكثير الكثير .. غيرت من Datatable الى Dataset ونفس المشكلة
واستخدمت طريقة الـ Bitmap
المهم
تكفون افيدونا وساعدوني ..
شكراً ..