Jak usunąć aplikację z paska zadań w Delphi 2009 ?

j.w.

Sposoby znane z D7 nie działają...

a jakie to są te sposoby bo mi kula magiczna nie działa

na przykład taki:

program Project1;

uses
  Forms,
   Windows,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.RES}

var
  Ex : Integer;

begin
  Application.Initialize;

  Ex:=GetWindowLong(Application.Handle, GWL_EXSTYLE);
  SetWindowLong(Application.Handle,GWL_EXSTYLE,
  Ex or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);

  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

niestety nic nie działa

Dodaj na końcu pliku pas, ale nie w projekcie

{Szufladki}
begin
  SetWindowLong(Application.Handle, GWL_EXSTYLE, GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
end.
</delphi

wala napisał(a)

j.w.

Sposoby znane z D7 nie działają...

A nie możesz w OnShow głownej formatki dać po prostu:

ShowWindow(Application.Handle, SW_HIDE);

Nie wiem czy zadziała, ale myślę że powinno.

@olesio:
Jemu chodziło o wywalenie informacji o oknie z paska zadań, a nie o ukrycie okna -_-;

A to już zgłupiałem, może źle doczytałem, ale kod:

SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE)
or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);

w metodzie OnCreate zrobi to samo co w OnShow kod:

ShowWindow(Application.Handle, SW_HIDE);

Przynajmniej efekt wizualny jest taki sam, belka znika z paska zadań.

Wszystko pięknie...

ShowWindow(Application.Handle, SW_HIDE);

ten kod działa... ale jak kliknę na formę to program pojawia się ponownie na pasku zadań.