Source position: msedb.pas line 1027
type setvardataty = procedure(
const sender: tmsevariantfield;
avalue: variant
) of object;