Cita:
Empezado por marcoszorrilla
yo buscaba poner ese código en el OnLostFocus, pero el componente no tiene esa propiedad, por lo que la dejé a modo de idea...
|
Hola.
Y creo que no estás para nada desorientado. Estuve pensando en lo que explicabas arriba, me parece que cuando se llama a una ventana modal en el evento
OnExit, y se fuerza la pérdida del foco, el mouse se despista de donde debe liberar el boton presionado.
Ese es el comportamiento extraño que nota José cuando dice:
Cita:
Mi sospecha es que al hacer click sobre el segundo TEdit se activa la seleción de texto.
|
Pero en ese punto
ActiveControl ya apunta al siguiente control, entonces lo podemos usar.
Código Delphi
[-]
procedure TForm1.Edit1Exit(Sender: TObject);
begin
ShowMessage(ActiveControl.Name); PostMessage(ActiveControl.Handle, WM_LBUTTONUP, 0, 0);
end;
Saludos.