¿Dónde está el foco?

[[Lepe]]

Con las virguerías que puede hacer un usuario con el ratón... es difícil saber de donde viene el foco .

Es cierto que los controles tienen un evento OnExit, que puede ser enlazados al mismo evento, de forma que podrías saberlo más o menos:

Código Delphi [-]
var FControl :TControl;

....


procedure TForm1.AlSalirDelControl(Sender:TObject);
begin
  FControl := TControl(Sender);
end;

Pero tendrás que elegir todos los controles del Form y asignarle ese mismo evento para que al salir el foco, se registre.

Quizás haya una solución mejor que alguien haya utilizado.

Saludos

[Berto2003]

Gracias Lepe,

Sí tienes razón, las virguerías son casi infinitas y eso, esto intentando darle libertad al usuario pero a la vez no dejar que haga ciertas cosas, un lío tu sabes

Bueno, he conseguido "solucionar" por ahora el tema. Falta ahora el testeo exhaustivo (cruzo los dedos gracias por la ayuda y hasta pronto