ayuda con teclas

[roman]

Empezado por perico

roman, lo que pasa es que los speedbutton estan es en otro formulario y el si toma el foco de todos modos gracias y si tienes alguna otra sugerencia estaria muy agradecido.

Vamos a suponer que los speed button están en Form1 y los TEdit en Form2.

En Form1 interceptas el mensaje WM_MOUSEACTIVATE:

Código Delphi [-]
type
  TForm1 = class(TForm)
  private
    procedure WMMouseActivate(Msg: TWMMouseActivate); message; WM_MOUSEACTIVATE;
  end;

implementation

procedure TForm1.WMMouseActivate;
begin
  Msg.Result := MA_NOACTIVATE;
end;

Con esto puedes presionar los speed button sin que Form2 pierda el foco.

// Saludos