Zooming Out and Zooming In (C++ Builder 4.0)

Take the following steps to add code that can reduce and enlarge the displayed size of the image. This demonstrates the scaling properties that are normally used for zooming in and zooming out. It emphasizes the relationship of the displayed rectangle to the LEAD RasterView control.

1.

Start with the project that you created in Loading and Displaying an Image.

2.

image\btncmd.gif Add two buttons to your form and name them as follows:

 

Name

Caption

 

ZoomIn

Zoom In

 

ZoomOut

Zoom Out

3.

Code the ZoomIn button's click procedure as follows:

void __fastcall TForm1::ZoomInClick(TObject *Sender)
{
 LEADRasterView1->AutoSetRects = True;
 LEADRasterView1->PaintSizeMode = PAINTSIZEMODE_ZOOM;
 LEADRasterView1->PaintZoomFactor = LEADRasterView1->PaintZoomFactor + 10;
}

4.

Code the ZoomOut button's click procedure as follows:

void __fastcall TForm1::ZoomOutClick(TObject *Sender)
{
 LEADRasterView1->AutoSetRects= True;
 LEADRasterView1->PaintSizeMode= PAINTSIZEMODE_ZOOM;
 if ( LEADRasterView1->PaintZoomFactor> 10 )
LEADRasterView1->PaintZoomFactor= LEADRasterView1->PaintZoomFactor - 10;
}

5.

Run your program to test it.