Source position: msegui.pas line 2092
public procedure twidget.beforeclosequery(
var amodalresult: modalresultty
); virtual;