copycomponent

function copycomponent(

  const source: tcomponent;

  const aowner: tcomponent = Nil;

  const onfindancestor: tfindancestorevent = Nil;

  const onfindcomponentclass: tfindcomponentclassevent = Nil;

  const oncreatecomponent: tcreatecomponentevent = Nil;

  const onancestornotfound: tancestornotfoundevent = Nil

):tcomponent;