cGrayAlpha4

function cGrayAlpha4(

  Gray: Integer;

  Alpha: Integer

):TColor4; overload;

function cGrayAlpha4(

  Gray1: Integer;

  Gray2: Integer;

  Gray3: Integer;

  Gray4: Integer;

  Alpha1: Integer;

  Alpha2: Integer;

  Alpha3: Integer;

  Alpha4: Integer

):TColor4; overload;