Source position: synedittypes.pp line 145
type TSynMouseLastCaretEvent = procedure(
Sender: TObject;
ACaret: TPoint
) of object;