GetMinMaxBits example for Delphi

The following example retrieves the values for MinBit and MaxBit using GetMinMaxBits and writes the results.

    Lead1.GrayScale(12); {Grayscale image to 12-bit}
    Lead1.GetMinMaxBits();
    Edit1.Text := IntToStr(Lead1.MinBit);
    Edit2.Text := IntToStr(Lead1.MaxBit);