OnExit

// Главная форма
frm=new TForm();
frm.Caption="JS+ - событие визуальных компонентов OnExit";
frm.Width =450;
frm.Height=300;

bt1=new TButton(frm);
bt1.Caption="Кнопка 1";
bt1.Left=(frm.ClientWidth -bt1.Width)/2;
bt1.Top =(frm.ClientHeight-bt1.Height*3)/2;
bt1.OnExit=btn_Exit;

bt2=new TButton(frm);
bt2.Caption="Кнопка 2";
bt2.Left=bt1.Left;
bt2.Top =bt1.Top+bt2.Height*1.5;
bt2.OnExit=bt1.OnExit;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Нажмите несколько раз клавишу Tab";

bt1.SetFocus();
frm.ShowModal();

// Обработчик события OnExit
function btn_Exit(btn)
{
  stb.SimpleText=" Потеря фокуса: "+btn.Caption;
}