Source position: kmemortf.pas line 22
type TKMemoRTFCtrlMethod = procedure(
ACtrl: Integer;
var AText: AnsiString;
AParam: Integer
) of object;