taction相关内容

在运行时创建操作的工具按钮

我在工具栏中使用 Delphi 2009 Toolbuttons 创建，如下所示:创建 TToolbutton 运行时 不同之处在于我也在运行时分配了一个动作.我的代码如下: 函数 TSymbolVisWin.MakeButton(BCnt:integer; Act:TAction):integer;无功TB : TToolButton;ACnt，Ind:整数；开始TB:=TToolBut ..

发布时间：2021-07-13 20:02:23 delphi runtime taction 其他开发

将TAction重命名为另一种形式

我有2种表单，我想共享一个 TActionManager 并分配 TAction -s。 第一个表单是主表单-它包含 TActionManager ， TAction Form1的主菜单将此动作和menuitem标题属性设置为“动作A”。 Form2包含Form1，并且还将动作分配给menuitem，并将标题设置为“动作B”。 在设计期间，一切看起来都很好-菜单项命名为“ Fo ..

发布时间：2020-10-20 05:53:27 delphi delphi-2010 c++builder-2010 taction 其他开发

如何在Delphi 2010中以编程方式向Action Manager添加操作

我正在尝试动态添加操作项，我可以添加该项目，并且在执行此操作时会起作用： HostActionItem： = ActionManager.ActionBars [0] .Items [0] .Items [2]; NewItem：= HostAction.Items.Add; NewItem.Action：= MyActionToPerform; NewItem.Caption ..

发布时间：2020-10-20 04:48:17 delphi delphi-2010 taction tactionmanager 其他开发

使用Vcl样式时更改TActionMainMenuBar的字体

通常，可以这样更改TActionMainMenuBar或TMainMenu的字体: Screen.MenuFont.Name := 'Calibri'; 使用Vcl样式时，如果为组件注册了StyleHook，则将无法再进行此操作. 我进入了位图样式设计器(以前称为Vcl样式设计器)，并更改了 MenuItemTextNormal 的字体. 问题是更改字体无济于事，我只能成功更改文本 ..

发布时间：2020-07-13 19:38:02 delphi fonts vcl-styles delphi-xe3 taction 其他开发

Delphi:如何停止自动重复执行TAction快捷键?

我正在使用带有某些操作快捷键的Delphi TActionList. 我想防止某些操作被键盘自动重复触发多次，但我不是要全局影响自动重复操作.最好的方法是什么? 说明 :我仍然需要处理多个快速按键-我想忽略的只是自动重复生成的按键. 解决方案 拦截 WM_KEYDOWN 消息，然后查看第30位以查看其是否在自动重复.如果是这样，只是不要像往常一样传递消息，就不会看到它. ..

发布时间：2020-04-26 08:14:13 delphi keyboard autorepeat taction 其他开发

当我的程序不活动时，如何处理键盘快捷方式？

如果我使用这样的话，对于多个事件，可以吗？ unit Unit4; 接口 使用 Windows，消息，SysUtils，变体，类，图形，控件，表单， 对话框，Clipbrd; type TForm4 = class（TForm） procedure FormCreate（Sender：TObject）; procedure WMHotkey（var Messa ..

发布时间：2017-08-31 04:01:30 delphi events shortcut taction 开发方法

Delphi空闲处理程序只在我移动鼠标时触发

我的D2006应用程序中有一个OnIdle处理程序。使用以下代码： 程序TMainForm.ApplicationEvents1Idle（发件人：TObject; var Done：Boolean）; begin Inc（IdleCalls）; 睡眠（10）; 完成：= False; 结束 该应用运行顺利，空闲处理程序每​​秒调用100次，CPU使用量为下一 ..

发布时间：2017-08-29 20:56:51 delphi event-handling python-idle delphi-2006 taction 开发方法

Delphi XE - TRibbon操作总是将焦点转移到MainForm

当我在不是应用程序主窗体的表单上放置一个TRIBOB控件时，TRIBBB的动作（即剪切，粘贴）将在执行操作后始终将焦点返回到MainForm。 即使持有Tribbon的TForm不是MainForm的孩子，也会发生这种情况。 我正在使用Windows 7 64位， Embarcadero RAD Studio XE版本15.0.3953.35171。 我使用TRibbon控件错误 ..

发布时间：2017-04-28 20:30:05 delphi focus delphi-xe ribbon taction Delphi

在设计时如何使子组件可用？

在我的自定义组件中，我创建了一些TAction作为子组件。它们都是发布的，但是我们无法在设计时分配它们，因为它们不能通过对象检查器使用。 如何使它们被对象“可迭代”检查员？我已经尝试将所有操作的所有者设置为自定义组件（这是托管表单）的所有者，但没有成功。 编辑：Embarcadero看起来更改Delphi IDE行为与此问题相关。如果您在XE之前使用Delphi版本，则应该从我自己的答 ..

发布时间：2017-04-24 23:09:47 delphi custom-component taction Delphi

我如何看到谁在Delphi中触发了一个动作？

当动作甚至触发时，“发件人”始终是动作本身。通常这是最有用的，但是有可能找出谁触发了该动作的一次事件？ 示例 假设您有一个表单，具有以下内容： 2个按钮，称为 Button1 和 Button2 1 TAction称为 actDoStuff 同样的操作分配给两个按钮。可以显示我点击了哪个按钮？ Example.dfm 对象Form1：TForm1 对象But ..

发布时间：2017-04-24 03:40:23 delphi taction Delphi

当我的程序不活动时，如何处理键盘快捷方式？

如果我使用这样的话，对于多个事件，可以吗？ unit Unit4; 接口 使用 Windows，消息，SysUtils，变体，类，图形，控件，表单， 对话框，Clipbrd; type TForm4 = class（TForm） procedure FormCreate（Sender：TObject）; procedure WMHotkey（var Messa ..

发布时间：2017-04-23 21:56:15 delphi events shortcut taction Delphi

为什么：可见，控制分配的TActions影响应用程序的CPU使用率？

如果 TAction 链接到一个对象，例如 TToolButton （Item $ TToolBar ）或 TActionClientItem （Item of TActionToolBar ），该对象在运行时可见，每当您以鼠标的形式（任何地方，但工具栏）移动鼠标时，根据可见TActions的数量似乎在CPU上执行额外的负载，这与在没有TAction链接的项目中移动鼠标时相比较 很明显，完成 ..

发布时间：2017-04-23 16:13:49 windows delphi cpu-usage taction Delphi

如何在我的组件中添加对操作的支持

我需要做些什么来为我的组件添加操作支持。它是一个按钮组件，但我猜这是任何组件类型是相同的。任何信息或如何帮助。 解决方案 这取决于您如何定义动作支持。有两种： 您可以自定义Action组件的Action属性，由Action组件分配 Action组件本身。 动作属性 每个TControl后代都有一个Action属性，默认情况下执行链接到鼠标左键。此链接由ActionLin ..

发布时间：2017-04-23 16:10:39 delphi components vcl taction Delphi