PDA

View Full Version : BMP to JMP?



mah.yar
جمعه 13 اردیبهشت 1387, 10:47 صبح
يه برنامه دارم که از دسکتاب عکس ميگيره و با دستور

Picture1.Picture = Clipboard.GetData(vbCFBitmap)عکس رو از بافر گرفته تو پيکچرباکس نشون ميده.
سپس با دستور


SavePicture Picture1.Picture, App.Path & "\1.jpg"عکس روي هاد ذخيره ميشه اما مسئله اينه که با فرمت BMP ذخيره ميشه که حجمش بالاي 2 مگابايت ميرسه.
دنباله يه برنامه گشتم که BMP رو به JPG تبديل کنه نه اينکه فقط پسوندشو تغيير بده.اما اکثرا برنامه هاي تو سايت پسوندو تغيير ميدادن.
البته يه dll بود که واقعا تبديل ميکرد اما من ميخوام از کد تو برنامم استفاده کنم نه dll.

علی خدایاری
دوشنبه 16 اردیبهشت 1387, 12:56 عصر
با SavePicture فرمت رو هم ميشه تغيير داد

مهران رسا
دوشنبه 16 اردیبهشت 1387, 13:20 عصر
با SavePicture فرمت رو هم ميشه تغيير داد

این چیزی که شما میگی . همون Rename به حساب میاد .

اتفاقاً من هم خیلی دوست دارم بتونم حجم عکس رو با کم کردن کیفیتش نصف کنم .

mah.yar
دوشنبه 16 اردیبهشت 1387, 16:41 عصر
يه dll+ocx تو سايت پيدا كردم كه اين كارو ميكنه.منتها خواستم بدون dll(با كد) اين كارو انجام بدم.
اين فايلو كه از سايت گرفتم دوباره براتون ميزارم شايد به كارتون اومد.

بايد با دستور

PicFormat321.SaveBmpToJpeg App.Path & "\x.bmp", "x.jpg", 60
عكسو به JPG تبديل كنيد كه عدد 60 مربوط به درصد كيفيتشه.

vbhamed
سه شنبه 17 اردیبهشت 1387, 00:02 صبح
سلام
چرا ؟
مي دونيد تبديل يك فايل چه الگوريتم پيچيده اي داره

mah.yar
سه شنبه 17 اردیبهشت 1387, 03:11 صبح
مي دونيد تبديل يك فايل چه الگوريتم پيچيده اي داره
اگه واقعا اينجوريه پس از dll استفاده ميكنم...
با تشكر