Rank: Member
Groups: Joined: 3/23/2006(UTC) Posts: 17
|
Have a look at this image: [Image was removed] I want to adjust it for example to look like: [Image was removed] Please help. Thanks Edited by user Friday, December 18, 2009 8:37:01 PM(UTC)
| Reason: Not specified
|
|
|
|
Rank: Advanced Member
Groups: Member, Administration Joined: 8/2/2003(UTC) Posts: 876
Thanks: 2 times Was thanked: 27 time(s) in 27 post(s)
|
Here is a code VBScript code snippet: Code:<%
Dim objBitmap
Set objBitmap = Server.CreateObject("GraphicsMill.Bitmap")
objBitmap.LoadFromFile Server.MapPath("original.jpg")
objBitmap.ColorAdjustment.Desaturate
objBitmap.ColorAdjustment.ChannelBalance 255, 98, 0, 0
objBitmap.SaveToStream Response
%>
I believe you will easy adapt it for VB6. Play with parameters of ChannelBalance to get the necessary tint. Last three parameters are RGB values. The higher value you pass, the more strong this color will affect the result. Hope this helps. P.S. BTW, if the original image is always grayscale, you can omit Desaturate method call to increase performance. Edited by user Thursday, December 20, 2007 4:51:21 PM(UTC)
| Reason: Not specified
|
|
|
|
Rank: Member
Groups: Joined: 3/23/2006(UTC) Posts: 17
|
Absolute Genius!!! Thanks!
|
|
|
|
Forum Jump
You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.