Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   ActionList y Shortcuts (https://www.clubdelphi.com/foros/showthread.php?t=13787)

roman 31-08-2004 07:48:22

ActionList y Shortcuts
 
Hola,

Si coloco un ActionList en un DataModule puedo enlazar controles de un formulario a sus acciones y todo funciona bien excepto porque las acciones no se activan al oprimir el 'shortcut' asociado.

¿Alguien sabe si ésta es una limitación y en tal caso como solventarla?

// Gracias

roman 31-08-2004 21:28:17

Bueno, pues al parecer sí que es una limitación del TActionList.

Según me explicó Peter Below (de los grupos de noticias de Borland) el formulario activo es quien pasa el shortcut a los ActionList que contenga de manera que si un ActionList reside en un DataModule nunca recibe el shortcut.

La solución entonces es pasárselo uno mismo. Con un objeto TApplicationEvents usamos el evento OnShortcut como sigue:

Código Delphi [-]
procedure TDataModule2.ApplicationEvents1ShortCut(
  var Msg: TWMKey; var Handled: Boolean
);
begin
  Handled := ActionList1.IsShortCut(Msg)
end;

Y listo, con esto las acciones se invocarán desde cualquier lugar de la aplicación.

// Saludos


La franja horaria es GMT +2. Ahora son las 06:13:22.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi