Source position: fphtml.pp line 303
type TBooleanEvent = procedure(
Sender: THTMLContentProducer;
var flag: Boolean
) of object;