السلام عليكم ورحمة الله
استخدمت برنامج الاخ عبد الله الدوسري لاخذ صورة من السكانر وهو يعمل بالشكل المطلوب
لكن المشكله الان اني لا استطيع حفظ هذه الصورة الى القرص الصلب
كيف اقوم بذلك
- برنامج الاخ عبد الله بالمرفقات
وعليكم السلام ورحمة الله وبركاته
اخي بعد ما تعرض الصورة في اداة الصور
هذا كود حفظ الصورة في مجلد البرنامج
كود :
PictureBox1.Image.Save(Application.StartupPath & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)
ولو حبيت تحفظها في القرص المحلي C
يكون الكود كالتالي :
كود :
PictureBox1.Image.Save("C:" & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)
You can use
SaveFileDialog
Try this
كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If



السلام عليكم ورحمة الله وبركاته
يا اخوان الصور لا تظهر في اداة PictureBox1
تظهر في اداة Panel16
فكيف الحل مع الحفظ رعاكم الله
كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Panel16.BackgroundImage.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If
الف شكر على تعاونك اخي العزيز kslawy
لكن بعد وضع الكود والتنفيذ ظهر خطاء
لم يتم تعيين مرجع كائن لمثيل كائن.
هل أنت متأكد أن الصورة موجودة بأداة Panel16

شكرا على تعاونكم جميعا لكن الصورة لا يتم عرضها في اي اداة تابعة للفجوال انما اداة مستقلة من leadtools اسمها RasterImageViewer
هذا كود اضافة صورة من 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
من لديه ينزله من فضلكم
وشكرا