graf_mbox

function graf_mbox(

  gr_mwidth: SmallInt;

  gr_mheight: SmallInt;

  gr_msourcex: SmallInt;

  gr_msourcey: SmallInt;

  gr_mdestx: SmallInt;

  gr_mdesty: SmallInt

):SmallInt;