ImageEn, unit imageenproc |
|
TImageEnProc.Swirl
Declaration
procedure Swirl(Twists: Double = 1.0); overload;
procedure Swirl(CenterX, CenterY, Radius: Integer; Twists: Double = 1.0); overload;
Description
Apply a swirl effect to the image to obfuscate its content.
Twists specifies the amount of rotation that should occur. Typical values are 0.5 to 1.5.
If you do not use the position overload, the swirl will be placed within the current selection. CenterX and CenterY can be specified as -1 to position in the center of the image. Radius can be -1 to draw to the maximum available width or height.
Note:
◼A UI for this is available to your users in the
Image Processing dialog◼Also available as a
RetouchTool by setting
MouseInteractGeneral to [miRetouchTool] and
RetouchMode to iermSwirl
◼If the image
PixelFormat is not ie24RGB, it will be converted
| Demos\ImageEditing\EveryMethod\EveryMethod.dpr |
// Load test image
ImageEnView1.IO.LoadFromFile( 'D:\TestImage.jpg' );
// Apply a swirl effect to the center of the image
ImageEnView1.Proc.Swirl( -1, -1, Round( ImageEnView1.Height * 0.4 ), 0.80 );