grid1.onexit vrs grid2.onclick

[ecfisa]

Hola Livey.

Si estás en grid1, al hacer click en otro control, grid1 pierde el foco, por lo tanto se dispara el evento grid1.OnExit.

Por lo tanto: Si el foco está en grid1 y hacés click sobre grid2, el orden de disparo de los eventos es:
1. grid1.OnExit
2. grid2.OnClick

No veo manera de que se te invierta ese órden... pero habría que ver el código.

Saludos.

[[Caral]]

Hola
Y no depende de lo que se ponga en el evento onexit del dbgrid1 ?
Por que ahi se puede poner lo que se quiera, incluso una condicion con respecto al dbgrid2.
Me equivoco?
Saludos

[ecfisa]

Empezado por Caral

Hola
Y no depende de lo que se ponga en el evento onexit del dbgrid1 ?
Por que ahi se puede poner lo que se quiera, incluso una condicion con respecto al dbgrid2.
Me equivoco?
Saludos

Si mi amigo, tenés razón, puede llamar a cualquier evento, condicion, hasta reiniciar la PC si lo desea.
Pero no te olvides que para que ese echo suceda, antes tiene que haberse disparado grid1.OnExit.


Saludos.

[Enan0]

Estube haciendo unas pruebas. Con unos StringGrid y DBGrid ya que no especificas cual usas y siempre se ejecuta el evento OnExit antes del click en el segundo Grid.

Talvez podrias poner parte de tu codigo para que te podamos dar un poco mas de ayuda.

[Livey]

Algo que no mencione es que el grid1 esta en un tabsheet y el grid2 esta en la forma como tal.
Si estoy editando en el grid1 y doy click en otro componente que se encuentre en el tabsheet, se ejecuta primero el evento grid1.onclick y luego el evento del click del otro componente, pero no sucede asi si doy click en el grid2, tambien se da en los botones del toolbar; ejecuta primero el evento del click y luego grid1.onclick
La medida que tome fue hacer una validación en cada uno de los componente que me genera problemas
Código Delphi [-]Function TFPrProy.ValidaDisp(Sender: TObject):Boolean; Begin If (Sender <> GrDistrFond) and ValDisp then Begin GrDistrFond.OnExit(Sender); If not ValDisp then Grid.SetFocus; End; Result := ValDisp; End;


Entonces dependiendo lo que retorne esa funcion se ejecuta los eventos del onclick de los diferentes componentes

[ecfisa]

Si estoy editando en el grid1 y doy click en otro componente que se encuentre en el tabsheet, se ejecuta primero el evento grid1.onclick

Hola Livey.

No importa donde esté hubicado grid1.

Insisto, si como decís, estás editando en grid1 (grid1 tiene el foco) y hacés click sobre otro control, primero se
ejecuta grid1.OnExit por que este evento se produce cuando el control pierde el foco.

Es más, si acabás de hacer un click sobre otro control... ¿ Como podría disparase grid1.OnClick ?

Es muy fácil de comprobar, poné en un form:
.- Dos StringGrid donde quieras: tabsheet, solos ... (Supongo que son StringGrid por que DBGrid no tinene el evento OnClick)
.- Varios controles que puedan recibir el foco.
.- Asigna:

Código Delphi [-]
procedure TForm1.grid1Click(Sender: TObject);
begin
  showMessage('grid1 on click');
end;

Código Delphi [-]
procedure TForm1.grid1Exit(Sender: TObject);
begin
  showMessage('grid1 on exit');
end;

Y verificalo.

En mis pruebas, con y sín TabSheet, el único grid1.OnClick que recibí fue cuando hice click sobre grid1.

Saludos.

[Livey]

Quizas no me explique bien, no es que siempre se ejecuta grid2.onclick, sino se ejecuta el click de componente que clickeo.
Crei que quizas era alguna propiedad que permitia esto.
Le doy la razon no es lógico, pero se me esta dando, porqué? ni idea.
Lo curioso es que siempre y cuando de click en componentes que estan en el tabsheet si se ejecuta primero grid1.onexit, pero si es en un componente fuera del tabsheet, ejecuta primero el click del componente y luego ejecuta el grid1.onexit.