Watch, Follow, &
Connect with Us

For forums, blogs and more please visit our
Developer Tools Community.


Welcome, Guest
Guest Settings
Help

Thread: Shortcut in OSX TMainMenu


This question is not answered. Helpful answers available: 2. Correct answers available: 1.


Permlink Replies: 2 - Last Post: Jan 15, 2017 2:41 AM Last Post By: Richard Simon
Nicolò Blunda

Posts: 23
Registered: 7/20/10
Shortcut in OSX TMainMenu  
Click to report abuse...   Click to reply to this thread Reply
  Posted: Apr 22, 2016 7:11 AM
Hello.
If I assign shortcut (with Text Shortcut) to some TAction linked to Main Menu item, in WIN this works excellently (shortcut is showed near text menu in menu, at runtime), but in OS X this assignment does not works.
The code is:

MyAction.ShortCut:= TextToShortcut('Ctrl+M');

Is a Seattle bug (in XE5 this works...)?

Edited by: Nicolò Blunda on Apr 22, 2016 7:12 AM
Zoltan Karpati

Posts: 2
Registered: 10/8/12
Re: Shortcut in OSX TMainMenu  
Click to report abuse...   Click to reply to this thread Reply
  Posted: Oct 19, 2016 2:08 AM   in response to: Nicolò Blunda in response to: Nicolò Blunda
I am using the following code in my program:

{$IFDEF MSWINDOWS}
MainForm.Draw_Vertices.ShortCut:=scCtrl or Ord('V');
{$ENDIF}

{$IFDEF MACOS}
MainForm.Draw_Vertices.ShortCut:=scCommand or Ord('V');
{$ENDIF}

MainMenu.RecreateOSMenu;

Richard Simon

Posts: 54
Registered: 10/7/07
Re: Shortcut in OSX TMainMenu  
Click to report abuse...   Click to reply to this thread Reply
  Posted: Jan 15, 2017 2:41 AM   in response to: Nicolò Blunda in response to: Nicolò Blunda
Nicolò Blunda wrote:
Hello.
If I assign shortcut (with Text Shortcut) to some TAction linked to Main Menu item, in WIN this works excellently (shortcut is showed near text menu in menu, at runtime), but in OS X this assignment does not works.
The code is:

MyAction.ShortCut:= TextToShortcut('Ctrl+M');

Is a Seattle bug (in XE5 this works...)?

Edited by: Nicolò Blunda on Apr 22, 2016 7:12 AM

Hi Nicolo
I am having the same problem... works fine on Windows but fails on OS X.
Did you manage to resolve this or should we refer to QC?
Regards
Rick
Legend
Helpful Answer (5 pts)
Correct Answer (10 pts)

Server Response from: ETNAJIVE02