//--------------------------------------------------------------------------- void __fastcall TEditorForm::EditorActionsExecute(TBasicAction *Action, bool &Handled) { Handled = true; if (Action == SaveAction) { assert(!FFileName.IsEmpty()); SaveToFile(); if (FOnFileChanged) { FOnFileChanged(this); } EditorMemo->Modified = false; UpdateControls(); } else if (Action == PreferencesAction) { DoPreferencesDialog(pmEditor); } else if (Action == ReloadAction) { Reload(); } else if (Action == FindAction || Action == ReplaceAction) { StartFind(Action == FindAction); } else if (Action == FindNextAction) { if (!FLastFindDialog) { FLastFindDialog = FFindDialog; } Find(); } else if (Action == GoToLineAction) { GoToLine(); } else if (Action == EditRedo) { EditorMemo->Redo(); } else if (Action == HelpAction) { FormHelp(this); } else if (Action == DefaultEncodingAction) { ChangeEncoding(TEncoding::Default); } else if (Action == UTF8EncodingAction) { ChangeEncoding(TEncoding::UTF8); } else { Handled = false; } }
//--------------------------------------------------------------------------- bool __fastcall CopyParamListPopupClick(TObject * Sender, TCopyParamType & Param, UnicodeString & Preset, int CopyParamAttrs, bool * SaveSettings) { TComponent * Item = dynamic_cast<TComponent *>(Sender); assert(Item != NULL); assert((Item->Tag >= cpiSaveSettings) && (Item->Tag < GUIConfiguration->CopyParamList->Count)); bool Result; if (Item->Tag == cpiConfigure) { bool MatchedPreset = (GUIConfiguration->CopyParamPreset[Preset] == Param); DoPreferencesDialog(pmPresets); Result = (MatchedPreset && GUIConfiguration->HasCopyParamPreset[Preset]); if (Result) { Param = GUIConfiguration->CopyParamPreset[Preset]; } } else if (Item->Tag == cpiCustom) { Result = DoCopyParamCustomDialog(Param, CopyParamAttrs); } else if (Item->Tag == cpiSaveSettings) { if (ALWAYS_TRUE(SaveSettings != NULL)) { *SaveSettings = !*SaveSettings; } Result = false; } else { Preset = (Item->Tag >= 0) ? GUIConfiguration->CopyParamList->Names[Item->Tag] : UnicodeString(); Param = GUIConfiguration->CopyParamPreset[Preset]; Result = true; } return Result; }