Reabro este hilo porque he tenido la misma necesidad que el compañero, y
efectivamente Hector tiene razón.
Pero deja de funcionar si quiero evitar el evento OnExit al pulsar sobre dos botones (pulsar sobre cualquiera de ellos, claro).
Ejemplo:
Código:
procedure TFMantoContratos.NumContratoExit(Sender: TObject);
begin
if (not BCancelar.Focused) or (not BNContratoAutomatico.Focused) then
begin
// las instrucciones del OnExit
end;
deja de funcionar para los dos botones.
¿a alguien se le ocurre alguna idea?