/// <summary>
/// constructor
/// </summary>
/// <param name="ACallerForm">the form that has opened this window; needed for focusing when this window is closed later</param>
/// <param name="ATheForm"></param>
/// <param name="AStatusBar"></param>
public TFrmPetraUtils(Form ACallerForm, IFrmPetra ATheForm, TExtStatusBarHelp AStatusBar)
{
FFormActivatedForFirstTime = true;
FVerificationResultCollection = new TVerificationResultCollection();
FTheForm = ATheForm;
FWinForm = (Form)ATheForm;
FStatusBar = AStatusBar;
FCallerForm = ACallerForm;
if (ACallerForm != null)
{
TFormsList.GFormsList.NotifyWindowOpened(ACallerForm.Handle, FWinForm.Handle);
}
FWindowExtensions = new TFrmPetraWindowExtensions(FWinForm, FCallerForm);
//
// Initialise the Data Validation ToolTip
//
FValidationToolTip = new System.Windows.Forms.ToolTip();
FValidationToolTip.ToolTipIcon = System.Windows.Forms.ToolTipIcon.Warning;
FValidationToolTip.ToolTipTitle = Catalog.GetString("Incorrect Data");
FValidationToolTip.UseAnimation = true;
FValidationToolTip.UseFading = true;
// WriteToStatusBar(Catalog.GetString("Ready."));
}
/// <summary>
/// constructor
/// </summary>
/// <param name="ACallerForm">the form that has opened this window; needed for focusing when this window is closed later</param>
/// <param name="ATheForm"></param>
/// <param name="AStatusBar"></param>
public TFrmPetraUtils(Form ACallerForm, IFrmPetra ATheForm, TExtStatusBarHelp AStatusBar)
{
FFormActivatedForFirstTime = true;
FVerificationResultCollection = new TVerificationResultCollection();
FTheForm = ATheForm;
FWinForm = (Form)ATheForm;
FStatusBar = AStatusBar;
FCallerForm = ACallerForm;
if (ACallerForm != null)
{
TFormsList.GFormsList.NotifyWindowOpened(ACallerForm.Handle, FWinForm.Handle);
}
FWindowExtensions = new TFrmPetraWindowExtensions(FWinForm, FCallerForm);
//
// Initialise the Data Validation ToolTip
//
FValidationToolTip = new System.Windows.Forms.ToolTip();
FValidationToolTip.ToolTipIcon = System.Windows.Forms.ToolTipIcon.Warning;
FValidationToolTip.ToolTipTitle = Catalog.GetString("Incorrect Data");
FValidationToolTip.UseAnimation = true;
FValidationToolTip.UseFading = true;
// WriteToStatusBar(Catalog.GetString("Ready."));
}
