Source position: jvtfdays.pas line 232
type TJvTFDragRowColEvent = procedure(
Sender: TObject;
Index: Integer;
var NewInfo: Integer;
var Confirm: Boolean
) of object;