TBGRAPixel

type TBGRAPixel = packed record

public

  blue: Byte;

  green: Byte;

  red: Byte;

  alpha: Byte;

  procedure FromRGB();

  procedure FromColor();

  procedure FromString();

  procedure FromFPColor();

  procedure ToRGB();

  function ToColor;

  function ToString;

  function ToGrayscale();

  function ToFPColor;

  function EqualsExactly();

  class operator assign(TBGRAPixel):TColor();

  class operator assign(TColor):TBGRAPixel();

  property Intensity: Word; [rw]

  property Lightness: Word; [rw]

end;