beforeframepaintbackgroundeventty

type beforeframepaintbackgroundeventty = procedure(

  const sender: tcustomframe;

  const canvas: tcanvas;

  const arect: rectty;

  const clip: Boolean;

  const move: Boolean;

  var handled: Boolean

) of object;