Fórum Barra de Tarefas #175386

16/08/2003

0

[color=darkblue:97ad24e05e][size=18:97ad24e05e]Crei um software em delphi.., mas quero que ele não apareça na barra de tarefas enquanto está sendo executado???[/size:97ad24e05e][/color:97ad24e05e]


Engcomp

Engcomp

Responder

Posts

16/08/2003

Cebikyn

Coloque no evento [b:ada2bfa442]OnShow[/b:ada2bfa442] do seu form:

procedure TMainForm.FormShow(Sender: TObject);
var
  hwndOwner: HWnd;
begin
  hwndOwner := GetWindow(Handle, GW_OWNER);
  ShowWindow(hwndOwner, SW_HIDE);
  ShowWindowAsync(hwndOwner, SW_HIDE);
  ShowWindowAsync(Self.Handle, SW_HIDE);
end; 


Coloque na seção [b:ada2bfa442]Private[/b:ada2bfa442]:

private
  procedure WMSysCommand(var msg: TWMSysCommand); message WM_SysCommand; 


E finalmente coloque na seção [b:ada2bfa442]Implementation[/b:ada2bfa442]:

procedure TMainForm.WMSysCommand(var msg: TWMSysCommand);
begin
  if msg.CmdType and $FFF0 = SC_MINIMIZE then
    hide
  else
    inherited;
end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar