السلام عليكم
أنا أبحث عن طريقة لضغط الصورة قبل حفظها في قاعدة البيانات
هذا هو الكود الذي أستخدمه لتحميل الصورة
b4a mysql httpjob
أنا أبحث عن طريقة لضغط الصورة قبل حفظها في قاعدة البيانات
هذا هو الكود الذي أستخدمه لتحميل الصورة
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")