taction

I'm using a Delphi TActionList, with Shortcut Keys for some actions. I want to prevent certain actions from being triggered multiple times by keyboard auto-repeat, but I do not want to affect auto-repeat operation globally. What's the best way of doing this? Clarification : I still need to handle multiple fast keypresses - it's only the keypresses generated by auto-repeat that I want to ignore. Intercept the WM_KEYDOWN messages, and look at bit 30 to see if it is auto-repeating. If it is, just don't pass on the message as usual and it will not be seen. You may need to enable form key-preview

I have an OnIdle handler in my D2006 app. With this code: procedure TMainForm.ApplicationEvents1Idle(Sender: TObject; var Done: Boolean); begin Inc (IdleCalls) ; Sleep (10) ; Done := False ; end ; the app runs smoothly, the idle handler is called 100 times per second, and the CPU usage is next to zero. I then added a TActionList and connected up some controls to actions, coded an Execute and Update handler. procedure TMainForm.ActionNewButtonExecute(Sender: TObject); begin DoNewProject ; end ; procedure TMainForm.ActionNewButtonUpdate(Sender: TObject); begin ActionNewButton.Enabled :=

When I place a TRibbon control on a form that is not the MainForm of the application, that TRibbon's actions (i.e. Cut, Paste) will always return focus to the MainForm after the action is executed. This occurs even if the TForm that holds the TRibbon is not a child of the MainForm. I am using Windows 7 64-bit, Embarcadero RAD Studio XE Version 15.0.3953.35171. Am I using the TRibbon control incorrectly, or is this an issue with the TRibbon? This is evidently by design. Sample code snippet from 'ribbonactnctrls.pas': procedure TRibbonBaseButtonControl.Click; begin inherited; SetFocus

Normally one could change the font of a TActionMainMenuBar or TMainMenu like this: Screen.MenuFont.Name := 'Calibri'; When using Vcl styles this isn't possible any more if a StyleHook is registered for the component. I went into the Bitmap Style Designer (formerly known as Vcl Style Designer) and changed the font for the MenuItemTextNormal . Problem is that changing the Font does nothing, I can only successfully change the Color of the text. Clearly I'm missing something here, why can I change the Color but not the Font? As you say changing the font of the MenuItemTextNormal element (or any

When a TAction event fires, the "Sender" is always the action itself. Usually that's the most useful, but is it somehow possible to find out who triggered the action's OnExecute event? Example Let's say you have a form with the following: 2 buttons, called Button1 and Button2 1 TAction called actDoStuff The same action is assigned to both buttons. Is it possible to show which button I clicked? Example.dfm object Form1: TForm1 object Button1: TButton Action = actDoStuff end object Button2: TButton Action = actDoStuff Left = 100 end object actDoStuff: TAction Caption = 'Do Stuff' OnExecute =