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

:confused:
يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ(33) سورة الرحمن
الرد }}}}
تم الشكر بواسطة:
#2
alimse كتب :السلام عليكم
اوريد معرفة كيف تحويل الصور الى بايت و حفظها فى ملف Notepad و استرجع الصوره مره اخرى من البايت من ملف Notepad

:confused:

و عليكم السلام
أستخدم هذا الكود:
كود :
Public Class Form1

    Dim myImg As Image = Image.FromFile(Application.StartupPath & "\myImg.jpg")

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        System.IO.File.WriteAllBytes(Application.StartupPath & "\myImg.txt", ImageToByteArray(myImg))
        MsgBox("Saved!")
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        PictureBox1.Image = ByteArrayToImage(System.IO.File.ReadAllBytes(Application.StartupPath & "\myImg.txt"))
        MsgBox("Loaded!")
    End Sub

    Public Shared Function ImageToByteArray(ByVal img As System.Drawing.Image) As Byte()
        On Error Resume Next
        Dim MS As New System.IO.MemoryStream()
        img.Save(MS, Imaging.ImageFormat.Png)
        Return MS.ToArray()
    End Function

    Public Shared Function ByteArrayToImage(ByVal arr As Byte()) As System.Drawing.Image
        On Error Resume Next
        Dim MS As New System.IO.MemoryStream(arr)
        Return System.Drawing.Image.FromStream(MS)
    End Function
End Class

حيث Button1 لحفظ الصورة في ملف txt و Button2 لعرض الصورة في PictureBox1
و المتغير myImg يحمل الصورة التي يتم حفظها أو عرضها
الرد }}}}
تم الشكر بواسطة:
#3
يعطيك العافية
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}}
تم الشكر بواسطة:
#4
اعملها serialize علشان لو فتحت النوتة تلاقي كلام لو حفظته مرة تانية ميأثرش علي الملف و يبوظ
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن سؤال لأهل الخبره خاص بالتخزين sql server lemozza 4 40 منذ 7 ساعة مضت
آخر رد: حريف برمجة
  سؤال فى طريقه إعداد ال ToolBox فى VB.net 2015 ابوثامر الحربي 11 157 17-10-17, 07:14 PM
آخر رد: ابوثامر الحربي
  تغير حجم شاشات البرنامج عند العمل على شاشات اخرى nassery99 3 77 16-10-17, 12:42 PM
آخر رد: silverlight
  [سؤال] سؤال لمبتدئ بالبرمجه برجاء المساعده Muhammad-Elbokl 1 70 16-10-17, 02:03 AM
آخر رد: نبيل فتحى
  [VB.NET] سؤال عن برمجة برنامج Badi054 6 90 15-10-17, 04:43 PM
آخر رد: سعود
  احتاج كود لطباعة الصور المخزنة في الداتا بيز Access sajakh 0 31 14-10-17, 10:33 PM
آخر رد: sajakh
  سؤال فى الفرق بين وقتين nabil.1710 4 94 14-10-17, 11:34 AM
آخر رد: nabil.1710
  [VB.NET] سؤال : الاستخدام الصحيح ل BackgroundWorker او Threading dubai.eig 11 202 05-10-17, 05:51 PM
آخر رد: silverlight
  [VB.NET] سؤال :- طريقة جميع الوقت من قاعدة البيانات dubai.eig 4 122 03-10-17, 04:02 PM
آخر رد: dubai.eig
  سؤال برممجي في الصور..؟ طـلال 5 124 02-10-17, 05:09 AM
آخر رد: khodor1985

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


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