This method displays a magnifier in the ImageKit Control. The size of the magnifier is determined by the Magnifier.Height and Magnifier.Width properties

[C++Builder]   [ bool = ]imagekitcontrolname->Magnifier->Show(bool Show, int X, int Y, double Scale)
[Delphi]   [ Boolean = ]imagekitcontrolname.Magnifier.Show(Show: Boolean; X, Y: Integer; Scale: Double)

Parameters

Value Explanation
Show Sets the display of the magnifier window: True displays the magnifier, False hides the magnifier
x,y Sets the location of the center of the magnifier (in pixels)
Scale Sets the magnification of the display in the magnifier (actual size display = 1.0)

Return Value

Returns True if successful. Returns False if unsuccessful.

Explanation

The Show method displays a magnifier in the ImageKit Control. The Magnifier.Height and Magnifier.Width properties determine the size of the magnifier and must be set.

When the Show parameter = False, the x, y, and Scale parameter values are ignored.

The magnifier will be displayed on the image when that image's ShowInMagnifier property is set to True (For the base image, see the ShowInMagnifier property. For layer images see the Layer.ShowInMagnifier property).

The order in which images are displayed are: base image, layer images (from smallest to largest index)

Note that if the base image has not be set then the layer images are not displayed.

Sample code for displaying the magnifier:

In C++Builder

void __fastcall TForm1::VImageKit1MouseMoveImage(TObject *Sender, TShiftState Shift, int OriginX, int OriginY, int ALeft, int ATop, int ARight, int ABottom, double ScaleWidth, double ScaleHeight, int X, int Y)
//Magnifier
VImageKit1->Magnifier->Width = 100;
VImageKit1->Magnifier->Height = 100;
VImageKit1->Magnifier->Show(true, X, Y, 2);

In Delphi

procedure TForm1.VImageKit1MouseMoveImage(Sender: TObject; Shift: TShiftState; OriginX, OriginY, ALeft, ATop, ARight, ABottom: Integer; ScaleWidth, ScaleHeight: Double; X, Y: Integer);
//Magnifier
VImageKit1.Magnifier.Width := 100;
VImageKit1.Magnifier.Height := 100;
VImageKit1.Magnifier.Show(True, X, Y, 2);

 

The ImageKit10 VCL is a product created by Newtone Corporation