منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ضغط صورة قبل الحفظ mysql
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
أنا أبحث عن طريقة لضغط الصورة قبل حفظها في قاعدة البيانات 
هذا هو الكود الذي أستخدمه لتحميل الصورة

b4a  mysql httpjob
كود :
InputStream1 = File.OpenInput (File.DirAssets, "image.jpg")
    OutputStream1.InitializeToBytesArray(1000)
    File.Copy2(InputStream1, OutputStream1)
    Buffer = OutputStream1.ToBytesArray
    eptyimgstr=su.EncodeBase64(Buffer)
    myimage.Bitmap  =LoadBitmap (File.DirAssets, "image.jpg")
وعليكم السلام ورحمة الله وبركاته

وجدت  هذه المشاركة
يمكنك التعديل عليه وجعله يضغط الصور تلقائيا
ثم اجراء حدث الفظ بعد الضغط

Image Compressor