منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] تصدير صورة من السكانر - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] تصدير صورة من السكانر (/showthread.php?tid=1544)

تصدير صورة من السكانر - prj - 13-01-14

السلام عليكم ورحمة الله
استخدمت برنامج الاخ عبد الله الدوسري لاخذ صورة من السكانر وهو يعمل بالشكل المطلوب
لكن المشكله الان اني لا استطيع حفظ هذه الصورة الى القرص الصلب
كيف اقوم بذلك

- برنامج الاخ عبد الله بالمرفقات

RE: تصدير صورة من السكانر - حريف برمجة - 13-01-14

وعليكم السلام ورحمة الله وبركاته

اخي بعد ما تعرض الصورة في اداة الصور

هذا كود حفظ الصورة في مجلد البرنامج

كود :
PictureBox1.Image.Save(Application.StartupPath & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)
ولو حبيت تحفظها في القرص المحلي C

يكون الكود كالتالي :

كود :
PictureBox1.Image.Save("C:" & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)


RE: تصدير صورة من السكانر - Genius Live - 13-01-14

You can use SaveFileDialog

Try this

كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If

RolleyesRolleyesRolleyes


RE: تصدير صورة من السكانر - aftfm - 15-01-14

السلام عليكم ورحمة الله وبركاته

يا اخوان الصور لا تظهر في اداة PictureBox1
تظهر في اداة Panel16
فكيف الحل مع الحفظ رعاكم الله

RE: تصدير صورة من السكانر - kslawy - 15-01-14

كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Panel16.BackgroundImage.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If


RE: تصدير صورة من السكانر - aftfm - 15-01-14

الف شكر على تعاونك اخي العزيز kslawy

لكن بعد وضع الكود والتنفيذ ظهر خطاء

لم يتم تعيين مرجع كائن لمثيل كائن.

RE: تصدير صورة من السكانر - kslawy - 15-01-14

هل أنت متأكد أن الصورة موجودة بأداة Panel16 Huh

RE: تصدير صورة من السكانر - prj - 15-01-14

شكرا على تعاونكم جميعا لكن الصورة لا يتم عرضها في اي اداة تابعة للفجوال انما اداة مستقلة من leadtools اسمها RasterImageViewer

RE: تصدير صورة من السكانر - issatiger - 16-02-18

هذا كود اضافة صورة من RsterImageviewer1 الي قاعدة البيانات
  Dim myimage As RasterImage
                myimage = RasterImageViewer1.Image
                Dim ms As New IO.MemoryStream()
                Dim bmpImage As New Bitmap(myimage.ConvertToGdiPlusImage())
                bmpImage.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg)
                Dim data As Byte() = ms.GetBuffer()
                cmd.Parameters.AddWithValue("x2", data)
انا ابحث عن مكتبة leadtools.codecs.cmp.dll
من لديه ينزله من فضلكم 
وشكرا