Source position: synedittextbuffer.pp line 65
type TSynOnBeforeDeleteLines = procedure(
Sender: TObject;
AnIndex: Integer;
ACount: Integer
) of object;