如何在Delphi的IDE上下文菜单中添加菜单项

时间:2014-12-18 12:53:26

标签: delphi ide contextmenu iota

我正在尝试为Delphi的IDE添加一些功能以方便自己。我已经找到了如何使用INTAServices.MainMenu将菜单项添加到IDE主菜单,还能够创建一些自定义组件编辑器,因此我可以在组件的上下文菜单中拥有自己的菜单项。但我想在源编辑器的上下文菜单中添加一些功能。 我想在源代码编辑器中选择一些文本并右键单击它,这样我就可以按照我需要的方式对其进行转换,使用IOTAEditorServices.TopView.buffer.EditBlock.text和IOTAEditorServices.TopView.Buffer.EditPosition.InsertText(newText); 这可能吗?或者最简单的方法是使用主菜单项的快捷方式?

感谢。

1 个答案:

答案 0 :(得分:1)

实际上它只是一行代码: myPopup:= TPopupMenu(editorServices.TopView.GetEditWindow.Form.FindComponent(' EditorLocalMenu'));