Source position: JPP.Graphics.pas line 100
procedure GrayscaleRGB(
var R: Byte;
var G: Byte;
var B: Byte;
Amount: Byte = 255
);