Callback to copy a variant
Source position: varianth.inc line 215
const VarCopyProc: procedure( = ;
var d: tvardata;
const s: tvardata
)