sdlcolor.pas

[JernejL]

function ClampB(n: integer): byte;
begin
  if n > 255 then
    Result := 255
  else
  if n < 0 then
    Result &#58;= 0
  else
    Result &#58;= n;
end;