GetMinMaxVal example for Delphi

The following example retrieves the values for MinVal and MaxVal using GetMinMaxVal and writes the results.

    {Grayscale image to 12-bit}
    Lead1.GrayScale(12);
    {must call GetMinMaxVal first}
    Lead1.GetMinMaxVal();
    Edit1.Text := IntToStr(Lead1.MinVal);
    Edit2.Text := IntToStr(Lead1.MaxVal);