Як зробити програму невидимою в Alt+Tab

Якщо вам потрібно зробити програму невидимою при натисканні клавіш Alt+Tab, можна використовувати наступний код:

procedure TForm1.FormCreate(Sender: TObject);
var
 CurStyle: Integer;
begin
 CurStyle := GetWindowLong(Handle, GWL_EXSTYLE);
 CurStyle := (CurStyle or WS_EX_TOOLWINDOW) and (not WS_EX_APPWINDOW);
 SetWindowLong(Handle, GWL_EXSTYLE, CurStyle);
end;