[PhoeniX]

Только что проверил, помогло, ок?

Код:

procedure TForm1.FormActivate(Sender: TObject);
begin
  ShowWindow(Application.Handle, SW_HIDE);
  SetWindowLong(Application.Handle, GWL_EXSTYLE,
  GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);
end;

Код:

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := False;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

[angvelem]

ТС писал: клик, будем внимательны. Кстати у меня этот способ не прокатил так то.
Кстати, не прокатил ни один из способов где-либо описанных и по приведённой мною ссылке тоже (прямо заколдованная программа), по приведённой ссылке и чуть далее, имеется даже компонент для этого. Не проверял.

[PhoeniX]

Хм, хотя действительно появляется на мгновение. Странно.

[angvelem]

А у меня, даже на мгновение не гаснет. Прим. XP sp3, Delphi2009