Автор: Marco Romanini (Delphi Tech Support)

Если вы хотите что-то сделать когда ваше приложение теряет фокус, используйте обработчик события Application.onDeactivate. Добавьте следующую строку в обработчик формы FormCreate:

Application.OnDeactivate=AppDeactivate; 

Затем создайте следующий метод:

procedure Form1.AppDeactivate(Sender: TObject);
begin
  ...
  { здесь ваш код}
  ...
end;