Source position: rgbutils.pas line 48
procedure ClipDimension(
ClipMin: Integer;
ClipMax: Integer;
var DstPos: Integer;
var SrcPos: Integer;
var SrcSize: Integer
);