How to hide program from the taskbar

[Ivan]

I can't hide my program from the taskbar under the windows. How can i do it?
it's doesn't work:

Code: [Select]


program project1;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, Unit1, LResources, Windows
  { you can add units after this };
   var
EStyle : integer;
{$IFDEF WINDOWS}{$R project1.rc}{$ENDIF}

begin
  {$I project1.lrs}
  Application.Initialize;
  EStyle:=GetWindowLong(Application., GWL_EXSTYLE);
SetWindowLong(Application.HideHint, GWL_EXSTYLE,
EStyle or WS_EX_TOOLWINDOW);
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.                                           


[typo]

http://www.lazarus.freepascal.org/index.php/topic,10812.msg53620.html#msg53620