Instead of just minimizing the window, you need to minimize the application:

  //WindowState := wsMinimized; <- wrong
  //ShowWindow(Handle, SW_MINIMIZE); <- wrong
  ShowWindow(Application.Handle, SW_MINIMIZE); // <- 👍