Source position: cliputils.pas line 25
function PutTextToClip(
ClipUnit: Byte;
Text: AnsiString
):Boolean;