[Delphi] 작업표시줄에 나타나지 않기

 

프로젝트 파일 (.dpr)에서 작업을 친다.

Window Style 조절로 가능.

 

아래는 예제 프로젝트의 dpr 파일.

굵게 표시된 부분만 추가하면 됨.

 

program ToolWin;

 

uses
  Forms,
  Windows,
  Main in 'Main.pas' {frmMain};

 

{$R *.res}

 

var ExtendedStyle: Integer;

 

begin
  Application.Initialize;

 

  // 작업표시줄에 나타나지 않게
  ExtendedStyle:=GetWindowLong(application.Handle, GWL_EXSTYLE);
  SetWindowLong(Application.Handle, GWL_EXSTYLE, ExtendedStyle or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);

 

  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.