Source position: kmemo.pas line 463
type TKMemoBlockStyleChangedEvent = procedure(
Sender: TObject;
AReasons: TKMemoUpdateReasons
) of object;