Source position: cyFieldLink.pas line 55
type TProcGetValue = procedure(
Sender: TObject;
Value: Variant
) of object;