thread transparente

[piccolo2101]

Hola,

me gustaría saber como puedo hacer que un thread de una aplicación capture los eventos de pulsación de teclas en cualquier formulario de esta sin que los eventos lleguen a los propio formularios y que el thread sea, en caso de ciertas teclas, el que propague dicho evento como si él no existiera.
Bueno me explico algo mejor. Tengo una aplicación con varios formularios que se muestran de forma simultánea y cada uno tiene implementado los eventos de pulsació de teclas para realizar acciones. Hay teclas que actuan de forma específica según la ventana (el escape cierra la ventana que tiene el focus), mientras que otras hacen cosas generales (el ctrl abre y cierra un micrófono). La idea es hacer un thread que atrape las pulsaciones de las teclas durante la ejecución de mi programa vea si es una tecla general, como el ctrl y realice la acción sin que los formularios se enteren, o que si es de carácter específico, como el escape, sea capaz de reproducir el evento para que sea atrapado por los OnKeypress, OnKeyUp, y demás de la función en concreto.

Un saludo y gracias.

[Neftali [Germán.Estévez]]

Hay una forma sencilla de hacer esto, sin necesidad de un Thread; Puedes utilizar el componente TApplicationEvents que viene con Delphi.

Coloca en tu formulario principal un componente de éstos (paleta addicional).
En el evento OnShortCut programa lo siguiente:


var
ShiftState: TShiftState;
begin

// Estado de las teclas Ctrl, Shift,Alt,...
ShiftState := KeyDataToShiftState(Msg.KeyData);

// Buuscar combinaciones necesarias...
if (ShiftState = [ssCtrl]) and (Msg.CharCode = VK_F5) then begin
MessageDlg('CTRL+F5', mtInformation, [mbOK], 0);
end
else if (ShiftState = []) and (Msg.CharCode = VK_F5) then begin
MessageDlg('F5', mtInformation, [mbOK], 0);
end
else if ...

end;

[piccolo2101]

Ok, gracias. Le echaré un vistazo a ver si resulevo algo. Lo que no me ha quedado claro es como se pasa el evento de pulsación de tecla al formulario que tiene el focus en caso de que éste componente no debe hacer nada con esa combinación de teclas.

Un saludo y gracias

[Neftali [Germán.Estévez]]

...es como se pasa el evento de pulsación de tecla al formulario que tiene el focus en caso de que éste componente no debe hacer nada con esa combinación de teclas.

Es que en ese caso lo que debes hacer es no programar las teclas aquí; De esa forma las genéricas van en éste componente y el resto cada formulario captura las suyas.