Hola.
Coincido totalmente con
Crandel, que lo lógico es ejecutar la acción en el evento
OnClick del componente.
Pero si aún querés saber en el evento
OnExit del
TEdit si presionó determinado
TButton, podés hacer por ejemplo:
Código Delphi
[-]
procedure TForm1.Edit1Exit(Sender: TObject);
begin
if ActiveControl.Name = 'btnSalir' then
Close;
end;
Pero como sugirió
Crandel, es más natural hacer:
Código Delphi
[-]
procedure TForm1.btnSalirClick(Sender: TObject);
begin
Close;
end;
Saludos.