PaintScaling eample for Delphi (Main Control)

{This example sets the display to use bilinear interpolation}
LeadImage1.PaintScaling := psResample;