Important alert: (current site time 4/18/2014 1:23:45 AM EDT)
 

winzip icon

iBMP 2.1

Email
Submitted on: 4/22/2013 2:33:56 PM
By: Carles P.V. 
Level: Intermediate
User Rating: By 60 Users
Compatibility: VB 6.0
Views: 28944
 
     21 Jan 2013. Update:
- Completely recoded DIB managing and processing
- MDI interface
- Recent files support
- ...

11 Jan 2003. First release:
- Basic image viewer/enhancer. Read/Save 1/4/8/24bpp formats when supported.

GDI+ is needed

Zip 105Kb


 
winzip iconDownload code

Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come out every day, so no prevention program can catch 100% of them. For your own safety, please:
  1. Re-scan downloaded files using your personal virus checker before using it.
  2. NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
  3. Scan the source code with Minnow's Project Scanner

If you don't have a virus scanner, you can get one at many places on the net including:McAfee.com

 
Terms of Agreement:   
By using this code, you agree to the following terms...   
  1. You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
  2. You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   
  3. You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
  4. You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.


Other 53 submission(s) by this author

 


Report Bad Submission
Use this form to tell us if this entry should be deleted (i.e contains no code, is a virus, etc.).
This submission should be removed because:

Your Vote

What do you think of this code (in the Intermediate category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor (See voting log ...)
 

Other User Comments

1/12/2003 3:59:17 PMPhantom Man

What Can I Say Except - OutStanding!!!

Top Marks.

Regards

(If this comment was disrespectful, please report it.)

 
1/12/2003 4:25:10 PMTwinWare

Great code man. Me loves it!!!
(If this comment was disrespectful, please report it.)

 
1/12/2003 6:08:12 PM

This rocks!

I am intrested to know if you are going to look into Layers and incorporating them?
(If this comment was disrespectful, please report it.)

 
1/13/2003 12:36:45 AMRoger Gilchrist

Great 5*. Just small quibbles
in
Public Sub Colorize
you have
Dim H As Single
this clashes with the
Private H as Long
in Declaration section
if Private Type EncoderParameter
Private Type PICTDESC
you have a member called 'Type' which upset code formatter. Probably not good idea to over-load reserved words.
(If this comment was disrespectful, please report it.)

 
1/14/2003 6:47:31 AMEd Preston

This is the most impressive submission I have ever seen on planet source code. Legendary effort from the author and all who contributed. 5 globes
(If this comment was disrespectful, please report it.)

 
1/14/2003 7:08:12 AMNitin D Badole

Very Very Nice Effort!!!
(If this comment was disrespectful, please report it.)

 
1/16/2003 10:32:32 PMMrBobo

Much too thorough. Very little left for us lesser coders to do. Up to and beyond your usual high standard. 5 little round objects from me.
(If this comment was disrespectful, please report it.)

 
1/31/2003 3:38:20 PM[[.DarkSouL.]]

W0W this rocks too much, 5 globes!
(If this comment was disrespectful, please report it.)

 
3/10/2003 12:11:19 AMOmar Dixon (OmarSwan)

This is too much!
(If this comment was disrespectful, please report it.)

 
4/17/2003 1:38:58 AMHerman Liu

Excellent. Thanks. Just a tiny item spotted: it appears, though the color count is 16 after color reduction to 16-color, the picture is actually not 4-BPP because one or more of the 16 colors falls outside the 16-color palette, in this case it should still be 8-BPP.
(If this comment was disrespectful, please report it.)

 
4/17/2003 10:12:08 AMHerman Liu

Sorry for a mixup in above (regarding 16-color), I overlooked something and was referring to another context.
(If this comment was disrespectful, please report it.)

 
7/27/2003 3:54:13 PMaCidw0rm

with all this effort how come there is only low quality gif saving?
(If this comment was disrespectful, please report it.)

 
9/6/2003 7:09:09 PM

This is too much of you man.
how do you think and how do you act
very smart and iteligent coding.
Every thing is realy admireable.
max golbes from me
By the way thanks for mail me.
Inspite of your Best code, it is more appritiable that you feedback your codes. Once again thanks

(If this comment was disrespectful, please report it.)

 
9/6/2003 7:10:53 PM

Forgot to write my name
(If this comment was disrespectful, please report it.)

 
9/6/2003 7:13:43 PM

I don't know my name was not written
Its Muhammad Asif
(If this comment was disrespectful, please report it.)

 
10/19/2003 9:13:56 PMYehia Muhsen

This is what I'm looking for... Thank you very much Carles... Your program is so amazing, man... Thanks again, and here you go 5 globes...
(If this comment was disrespectful, please report it.)

 
1/27/2004 7:51:52 PMKenKnutson

This is absolutely fantastic. It actually filters faster than Jasc's PaintShop Pro on my PC. That's without compilation. I am duly impressed and awed. Mr. Bobo put it right: you leave so little for us lesser mortals to do it's almost shameful.
(If this comment was disrespectful, please report it.)

 
2/11/2004 3:32:32 PM

great work!

5 globes :)

i was actually looking for a code that can convert png to bitmap, i cant find any code that does this pecificly.
this app is so expended i dont get it how it save png to bitmap
(If this comment was disrespectful, please report it.)

 
2/1/2005 12:38:27 PMTom Level

hi carles!
couldnt find your email :(
could u maybe add support for .sff format? its the standard fax format and i couldnt find any infos about it. it's needed for sending faxes.
thanks,
tom

ps: u can email me at sicnezz@gmx.net
(If this comment was disrespectful, please report it.)

 
8/3/2005 7:21:12 AMThomas

Can it handle multi-page tif file format?
(If this comment was disrespectful, please report it.)

 
9/2/2005 8:20:28 AMBrian Ail

Outstanding. Too outstanding me the intermediate cannot understand it yet.
(If this comment was disrespectful, please report it.)

 
10/25/2005 8:22:27 AMValentino

Very very excellent man!!!
Thank's
(If this comment was disrespectful, please report it.)

 
10/31/2005 5:39:51 AMGanesh K Prasannah

the best image processor anywhere!!

10 globes from me.
but y don't u try a directory browsing feature. that way iBMP wud b the best of the best. PLZ PLZ implement this feature
(If this comment was disrespectful, please report it.)

 
12/29/2005 4:54:42 PMNetSplit

Hi
i am trying to find yoru email address...
can you please email me at yk@betterqa.com
Thanks
Yan
(If this comment was disrespectful, please report it.)

 
4/7/2006 9:18:55 AMIan Bunting

Is it possible to specify a transparent colour when saving in GIF format ?
(If this comment was disrespectful, please report it.)

 
8/15/2006 9:36:36 AMAndy Stotzer

The reference you made to the required MS Download no longer exists!
(If this comment was disrespectful, please report it.)

 
7/10/2007 11:03:05 AMRob

Hi, this is great, I have one issue though, in design time you can preview changes e.g. Brightness etc and the whole image is changed, in the compiled version it only changes a small section at the bottom of the image - do you know why this happens ??
(If this comment was disrespectful, please report it.)

 
12/5/2008 1:05:23 AMQuicksilver

this is excellent - the most comprehensive submission related to picture manipulation on PSC

And what a modest name - iBMP
5 of course from me. but i am sure you dont need anyone to tell you that the submission is excellent. ;)
(If this comment was disrespectful, please report it.)

 
1/26/2013 9:28:14 PMZhu JinYong

Welcome,Return of the King。
(If this comment was disrespectful, please report it.)

 
1/27/2013 1:52:32 PMHerman CK

Carles code is always of high quality; clean, concise and without any twisting. For the benefit of readers for are not too familar with Carles's postings yet, please search and change "msvbvm50" to "msvbvm60" before you run the code if you are using VB6, not VB5.

Somehow by a slip of pen this copy of iBMP doesn't show the image of a 32-BPP file with alpha effects, but it can be rectified easily in LoadDIB subroutine of mGDIpEx.bas.

(If this comment was disrespectful, please report it.)

 
1/27/2013 2:05:23 PMBonnie West

Here's a much faster pvPtrToStrW routine:

Private Declare Function SysReAllocString Lib "oleaut32.dll" (ByVal pBSTR As Long, Optional ByVal pszStrPtr As Long) As Long

Private Function pvPtrToStrW(ByVal lpsz As Long) As String
SysReAllocString VarPtr(pvPtrToStrW), lpsz
End Function


Awesome work, BTW!
(If this comment was disrespectful, please report it.)

 
1/28/2013 11:28:47 AMHerman CK

Terribly sorry, when I said that by a slip of pen the 24 BPP image displayed is without alpha effect when loaded with a 32-BPP PNG; I was wrong. When I changed the DIB background to white to see the image more clearly, the 24-BPP image displayed is in fact with due alpha effect.
(If this comment was disrespectful, please report it.)

 

Add Your Feedback
Your feedback will be posted below and an email sent to the author. Please remember that the author was kind enough to share this with you, so any criticisms must be stated politely, or they will be deleted. (For feedback not related to this particular code, please click here instead.)
 

To post feedback, first please login.