StretchIntensity example for Delphi
This example stretches the intensity and redisplays the image.
var
RasterProc: LEADRasterProcess;
sRet: Smallint;
begin
RasterProc:= CreateComObject (CLASS_LEADRasterProcess) as LEADRasterProcess;
RasterProc.StretchIntensity (LEADRasterView1.Raster);
LEADRasterView1.ForceRepaint (sRet);
end;