como se si he pulsado un boton

[ercrizeporta]

el evento que se ejecuta primero es el evento onexit, así que esa posible solución de la variable no es válida, ya que el valor de la variable se modificará una vez haya realizado el evento onexit, y yo necesitaría que se supiera antes del evento...teneis alguna otra idea de como realizarlo??
muchas gracias!!!

[[Héctor Randolph]]

Al hacer clic sobre el botón el edit le pasa el foco al botón, eso lo puedes verificar de esta manera.

Código Delphi [-]
procedure TForm1.Edit1Exit(Sender: TObject);
begin
  if not Button1.Focused then
  begin
    ShowMessage('El botón no tiene el foco');
   //Escribo aqui mi rutina
  end;
end;

Sin embargo, existe un caso desfavorable, si el botón recibe el foco no necesariamente implica que se ha pulsado sobre el.

Bueno, espero que esto sea útil de cualquier manera.

[dec]

Hola,

Empezado por ercrizeporta

el evento que se ejecuta primero es el evento onexit, así que esa posible solución de la variable no es válida, ya que el valor de la variable se modificará una vez haya realizado el evento onexit, y yo necesitaría que se supiera antes del evento...teneis alguna otra idea de como realizarlo??

Pues entonces entendí mal el asunto. Yo pensaba que se trataba de ejecutar cierto código en el evento "OnExit" del "TEdit" siempre que no se hubiera pulsado previamente un botón. Para esto sirve la solución de la "variable bandera", según yo lo veo.

¿Que no se pulsó el botón? Se ejecuta el código del evento "OnExit" del "TEdit". ¿Que ya se pulsó el botón? El código del evento "OnExit" del "TEdit" ya no se ejecutará. ¿No entendí bien el asunto o qué?