Código Delphi [-] ActionBusca.ShortCut := TextToShortCut('F3');
ActionBusca.ShortCut := TextToShortCut('F3');