//--------------------------------------------------------------------- __fastcall TFileSystemInfoDialog::TFileSystemInfoDialog(TComponent * AOwner, TGetSpaceAvailable OnGetSpaceAvailable) : TForm(AOwner) { UseSystemSettings(this); FOnGetSpaceAvailable = OnGetSpaceAvailable; FSpaceAvailableLoaded = false; FLastListItem = 0; CertificateGroup->Top = HostKeyGroup->Top; ReadOnlyControl(HostKeyFingerprintEdit); ReadOnlyControl(CertificateFingerprintEdit); ReadOnlyControl(InfoMemo); }
//--------------------------------------------------------------------------- __fastcall TEditMaskDialog::TEditMaskDialog(TComponent* Owner) : TForm(Owner) { UseSystemSettings(this); HintLabel(MaskHintText, FORMAT(L"%s\n \n%s\n \n%s\n \n%s", (LoadStr(MASK_HINT2), LoadStr(FILE_MASK_EX_HINT), LoadStr(PATH_MASK_HINT2), LoadStr(MASK_HELP)))); ReadOnlyControl(MaskMemo); }
//--------------------------------------------------------------------------- __fastcall TGenerateUrlDialog::TGenerateUrlDialog( TComponent * Owner, TSessionData * Data, TStrings * Paths) : TForm(Owner) { UseSystemSettings(this); FData = Data; FPaths = Paths; ReadOnlyControl(UrlMemo); }