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

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


الملفات المرفقة
.rar   Scanner Project VB2008.rar (الحجم : 925.98 ك ب / التحميلات : 300)
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

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

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

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

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

كود :
PictureBox1.Image.Save("C:" & "\Img1.jpeg", Imaging.ImageFormat.Jpeg)
الرد
تم الشكر بواسطة: prj
#3
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
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد
تم الشكر بواسطة: prj
#4
السلام عليكم ورحمة الله وبركاته

يا اخوان الصور لا تظهر في اداة PictureBox1
تظهر في اداة Panel16
فكيف الحل مع الحفظ رعاكم الله
الرد
تم الشكر بواسطة: prj
#5
كود :
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Panel16.BackgroundImage.Save(SaveFileDialog1.FileName, Imaging.ImageFormat.Bmp)
End If
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد
تم الشكر بواسطة: aftfm , prj
#6
الف شكر على تعاونك اخي العزيز kslawy

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

لم يتم تعيين مرجع كائن لمثيل كائن.
الرد
تم الشكر بواسطة: prj
#7
هل أنت متأكد أن الصورة موجودة بأداة Panel16 Huh
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  يجبرني البرنامج على حفظ صورة الموظف!! أبووسم 3 110 10-12-18, 11:49 PM
آخر رد: ahmadpal
  [سؤال] كيف أقوم بنسخ كلام عربي او انجليزي من صورة من خلال VB.net dametucorazon 4 120 04-12-18, 12:06 PM
آخر رد: dametucorazon
  ادراج صورة في الكرستال ريبورت المتألق9 2 110 02-12-18, 03:37 PM
آخر رد: المتألق9
  [سؤال] كيف احفظ صورة من picturebox1 الى مجلد ضمن مسار البرنامج بدون ظهور مربع حوار mh66 5 148 16-11-18, 07:53 PM
آخر رد: mh66
  [VB.NET] جلب صورة شخصية من الانستغرام trakktour 4 127 15-11-18, 04:22 AM
آخر رد: trakktour
  [سؤال] مشكلة في اظهار صورة عن طريق path Simo1991 4 114 06-11-18, 05:52 PM
آخر رد: Simo1991
  [سؤال] فتح صورة من خلال openfiledialog وعرضها في listview Simo1991 1 99 05-11-18, 06:47 PM
آخر رد: Simo1991
  جلب صورة أى فيديو بالHtmlAgilityPack ابو روضة 8 193 31-10-18, 10:46 PM
آخر رد: elgokr
  [VB.NET] اريد اظهار صورة الباركود في التقرير محمد بوقزاحة 0 117 22-10-18, 11:32 AM
آخر رد: محمد بوقزاحة
  [VB.NET] تصدير صفوف معينة للاكسيل محمد اسماعيل 8 190 15-10-18, 03:28 AM
آخر رد: محمد اسماعيل

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


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