Source position: forms.pp line 1001
type TQueryEndSessionEvent = procedure(
var Cancel: Boolean
) of object;