1. Tech

Your suggestion is on its way!

An email with a link to:

http://delphi.about.com/od/vclwriteenhance/l/aa052304a.htm

was emailed to:

Thanks for sharing About.com with others!

TEffects - graphics effects in Delphi
Full source code of the TEffects Delphi component - intended for making effects in style of Corel Draw or Adobe Photoshop. It also allows to import (and export) any kind of information into (from) bitmap (cryptography).
 Win prizes by sharing code!
Do you have some Delphi code you want to share? Are you interested in winning a prize for your work?
Delphi Programming Quickies Contest
 More of this Feature
• Download FULL SOURCE
• Download sample projects - set 1
• Download sample projects - set 2
 Join the Discussion
"Post your views, comments, questions and doubts to this article."
Discuss!
 Related Resources
• Graphics programming in Delphi
• Delphi graphics tips
• Working with GIFs

Article submitted by Pisarev Yuriy Yurievich for the Delphi Programming Quickies Contest.

TEffects
TEffects component is intended for making effects in style of Corel Draw or Adobe Photoshop. It also allows to import (export) any kind of information into (from) bitmap (cryptography). Any image is represented by object of TBitmap class.

Here is more information/sample projects for the TEffects component (download full set: part 1 and part part 2):

  • Works with Corel Photo Paint compatible masks
  • Implements saturation effect
  • Implements solarize effect
  • Implements posterize effect
  • Implements color noise effect
  • Implements inversion effect
  • Implements color filtering
  • Implements color adjusting
  • Implements brightness effects
  • Implements contrast effect
  • Implements blur effect
  • Implements sharpen effect
  • Implements transparency effect
  • Implements all kinds of rotation (rotation to any degree and mirroring in particular)
  • Implements pixelization effect
  • Implements rough blur effect
  • Separates image into number of channels. The channel is represented by single bitmap
  • Assemblies image from number of channels. The channel is represented by single bitmap
  • Implements cryptography technology

A few fun things are in TGraphUtils and TFunThings units. These units include:

  • TBitmapConvertor is intended for conversions between TBitmap class and TSmallBitmap structure (TSmallBitmap is type of dynamic array that represents 32 bit image of any size)
  • TCustomTextConvertor is abstract class that contains base code for conversion from bitmap into colored text
  • TCustomTextDrawer is one more abstract class with a code for drawing of colored text on a display device context
  • TTextConvertor converts image into html document
  • TTextDrawer is descendant of TCustomTextDrawer class
  • TDesktopDrawer is descendant of TCustomTextDrawer class which draws text directly on the desktop

Installation notes
To use the samples above you need first to install all necessary units. Download FULL set. The units should be installed in this order:

  1. MemUtils
  2. ExactTimer
  3. Waiter
  4. GrayBitmap
  5. Shape
  6. Effects
  7. GraphUtils
  8. FunThings

Here's a sample:

Original

inverted

Don't miss: Delphi Programming Quickies Contest!

©2017 About.com. All rights reserved.