//---------------------------------------------------------------------------
__fastcall TSynchronizeProgressForm::~TSynchronizeProgressForm()
{
ClearGlobalMinimizeHandler(GlobalMinimize);
ReleaseAsModal(this, FShowAsModalStorage);
if (IsApplicationMinimized() && FMinimizedByMe)
{
ShowNotification(NULL, LoadStr(BALLOON_OPERATION_COMPLETE), qtInformation);
}
}
//---------------------------------------------------------------------------
void __fastcall TSynchronizeDialog::Stop()
{
OnlyStop();
UpdateControls();
Repaint();
if (IsApplicationMinimized() && FMinimizedByMe)
{
FMinimizedByMe = false;
Application->Restore();
Application->BringToFront();
}
}
//---------------------------------------------------------------------------
void __fastcall TFileFindDialog::Start()
{
if (MaskEdit->Focused())
{
MaskEditExit(NULL);
}
RemoteDirectoryEdit->SaveToHistory();
CustomWinConfiguration->History[L"RemoteDirectory"] = RemoteDirectoryEdit->Items;
MaskEdit->SaveToHistory();
WinConfiguration->History[L"Mask"] = MaskEdit->Items;
WinConfiguration->SelectMask = MaskEdit->Text;
assert(FState != ffFinding);
FState = ffFinding;
try
{
UpdateControls();
Repaint();
TOperationVisualizer Visualizer;
assert(FOnFind != NULL);
FDirectory = UnixExcludeTrailingBackslash(RemoteDirectoryEdit->Text);
FOnFind(FDirectory, MaskEdit->Text, FileFound, FindingFile);
}
__finally
{
FFindingInDirectory = L"";
if (FState == ffFinding)
{
FState = ffDone;
}
if (FState == ffAborting)
{
FState = ffAborted;
}
if (IsApplicationMinimized() && FMinimizedByMe)
{
ShowNotification(NULL, LoadStr(BALLOON_OPERATION_COMPLETE), qtInformation);
FMinimizedByMe = false;
}
UpdateControls();
}
}
//---------------------------------------------------------------------------
void __fastcall TSynchronizeProgressForm::Start()
{
FStarted = true;
FStartTime = Now();
UpdateTimer->Enabled = true;
StartTimeLabel->Caption = FStartTime.TimeString();
Caption = LoadStr(FCompareOnly ? SYNCHRONIZE_PROGRESS_COMPARE : SYNCHRONIZE_PROGRESS_SYNCHRONIZE);
if (!IsApplicationMinimized())
{
// Do not showing the progress when the application is minimized,
// otherwise the form popups up unminimized.
// Quick as dirty hack: with this form, we do not support showing it
// once the application restores,
// otherwise we would have to synchronize it somehow with the TProgressForm,
// not to show it over the TProgressForm
ShowAsModal(this, FShowAsModalStorage);
}
}
