/**
* Event Handler that is invoked when the Form is about to close - no matter
* how the closing was invoked (by calling Form.Close, a Close button, the
* x Button of a Form, etc).
*
* @param sender Event sender
* @param e EventArgs that allow cancelling of the closing
*
*/
public virtual void TFrmPetra_Closing(System.Object sender, System.ComponentModel.CancelEventArgs e)
{
if (!CanClose() || !FTheForm.CanClose())
{
// MessageBox.Show('TFrmPetra.TFrmPetra_Closing: e.Cancel := true');
e.Cancel = true;
}
else
{
// MessageBox.Show('TFrmPetra.TFrmPetra_Closing: GFormsList.Remove(Self as Form)');
TFormsList.GFormsList.NotifyWindowClose(this.FWinForm.Handle);
TFormsList.GFormsList.Remove(FWinForm);
FWindowExtensions.TForm_Closing();
}
}
/**
* Event Handler that is invoked when the Form is about to close - no matter
* how the closing was invoked (by calling Form.Close, a Close button, the
* x Button of a Form, etc).
*
* @param sender Event sender
* @param e EventArgs that allow cancelling of the closing
*
*/
public virtual void TFrmPetra_Closing(System.Object sender, System.ComponentModel.CancelEventArgs e)
{
if (!CanClose() || !FTheForm.CanClose())
{
// MessageBox.Show('TFrmPetra.TFrmPetra_Closing: e.Cancel := true');
e.Cancel = true;
}
else
{
// MessageBox.Show('TFrmPetra.TFrmPetra_Closing: GFormsList.Remove(Self as Form)');
TFormsList.GFormsList.NotifyWindowClose(this.FWinForm.Handle);
TFormsList.GFormsList.Remove(FWinForm);
FWindowExtensions.TForm_Closing();
FStatusBar = null; // Throwing away my reference to the status bar may allow the form to be disposed,
// and may avoid an exception in WriteToStatusBar, below.
}
}
