A humble suggestion, since you're on prettyfying mode :)

[gcarreno]

Hi there,

This is just something I do for Windows/Linux UX and I don't mind if you ignore me ;)

uses
  {...}LCLType,{...}

implementation

procedure MainForm.FormCreate(Sender: TObject);
begin
  InitShortCuts;
end;

procedure MainForm.InitShortcuts;
begin
  {$IFDEF LINUX}
    acFileExit.ShortCut := KeyToShortCut(VK_Q, [ssCtrl]);
  {$ENDIF}
  {$IFDEF WINDOWS}
    acFileExit.ShortCut := KeyToShortCut(VK_X, [ssAlt]);
  {$ENDIF}
  { TODO : Implement the equivalent for MacOS }
end;

Cheers,
Gus

P.S.: I've been greeting you with "Hi there" and don't even know your name :-)

[gcarreno]

Again, many thanks!! Closing!