Source position: msegui.pas line 2748
type booleaneventty = procedure(
const avalue: Boolean
) of object;