delphi中怎样才能够使窗口在任务拦中不显示???

解决方案 »

  1.   

    显示和隐藏任务栏procedure HideTaskBar; 
    var 
      wndHandle : THandle; 
    begin 
      wndHandle := FindWindow('Shell_TrayWnd', nil); 
      ShowWindow(wndHandle, SW_HIDE); 
    end; procedure ShowTaskBar; 
    var 
      wndHandle : THandle; 
    begin 
      wndHandle := FindWindow('Shell_TrayWnd', nil); 
      ShowWindow(wndHandle, SW_RESTORE); 
    end; 是不是这个??
      

  2.   

    大家早!
    不是3楼说的啊我的意思是
    当你打开一个程序窗口的时候,任务拦不出现相应的图标。
    我的目的是:那样用户就不能够在图标上点鼠标右键,不能够实现关闭了!!
    (使右键菜单的Alt+F4不能够用)
      

  3.   

    不好意思上面写错了是!Application.showMainform:=false;
      

  4.   

    把窗体给设置成toolwindow 或是 none型的也可以,或是下面这种方法:
    setwindowlong(application.Handle,gwl_exstyle,ws_ex_toolwindow);
      

  5.   

    都不行呀!!
    Application.ShowHint:=true窗口又不能够在屏幕上显示
    BorderIcons属性设置也改成了[],但是怎么还是没有反映???
    大家快来帮忙呀!!:(555
      

  6.   

    不好意思看成标题栏了
    在form.create里
    setwindowlong(application.Handle,gwl_exstyle,ws_ex_toolwindow);
      

  7.   

    procedure TForm1.FormCreate(Sender: TObject);
    begin
      SetWindowLong(application.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
    end;
      

  8.   

    Sorry,打开时楼上还没有显示,楼上的先答了……
      

  9.   

    setwindowlong(application.Handle,gwl_exstyle,ws_ex_toolwindow);
      

  10.   

    setwindowlong可以了,
    如果窗体最小化的时候在任务栏里不出现怎么做?
      

  11.   

    建议楼主看看以下:
    1、Kingron ---- 超级猛料出新版了
    2、hubdog----葵花宝典
      

  12.   

    setwindowlong(application.Handle,gwl_exstyle,ws_ex_toolwindow);