Source position: JPL.Colors.pas line 179
function TetradicColor3(
const AColor: TColor;
DistanceFromComplementaryColor: Integer = 90
):TColor;