//---------------------------------------------------------------------------
__fastcall TFileFindDialog::TFileFindDialog(TComponent * Owner, TFindEvent OnFind)
: TForm(Owner)
{
UseSystemSettings(this);
FOnFind = OnFind;
FState = ffInit;
FMinimizedByMe = false;
FixComboBoxResizeBug(MaskEdit);
FixComboBoxResizeBug(RemoteDirectoryEdit);
HintLabel(MaskHintText,
FORMAT(L"%s\n \n%s\n \n%s\n \n%s\n \n%s\n \n%s", (LoadStr(MASK_HINT2),
LoadStr(FILE_MASK_EX_HINT), LoadStr(COMBINING_MASKS_HINT),
LoadStr(PATH_MASK_HINT2), LoadStr(DIRECTORY_MASK_HINT),
LoadStr(MASK_HELP))));
FSystemImageList = SharedSystemImageList(false);
FileView->SmallImages = FSystemImageList;
UseDesktopFont(FileView);
UseDesktopFont(StatusBar);
SetGlobalMinimizeHandler(this, GlobalMinimize);
}
//---------------------------------------------------------------------
__fastcall TConsoleDialog::TConsoleDialog(TComponent* AOwner)
: TForm(AOwner)
{
FTerminal = NULL;
FClearExceptionOnFail = false;
FOldChangeDirectory = NULL;
FPrevTerminalClose = NULL;;
FLastTerminal = NULL;
FDirectoryChanged = false;
OutputMemo->Color = clBlack;
OutputMemo->Font->Color = (TColor)0x00BBBBBB;
FixComboBoxResizeBug(CommandEdit);
UseSystemSettings(this);
OutputMemo->Font->Name = CustomWinConfiguration->DefaultFixedWidthFontName;
OutputMemo->Font->Size = CustomWinConfiguration->DefaultFixedWidthFontSize;
}
