ilikenba 发表于 2004-4-28 23:22

隐藏和显示任务栏!

<P>void __fastcall TForm1::Button1Click(TObject *Sender)
{
::ShowWindow(::FindWindow("Shell_TrayWnd",NULL),SW_HIDE);
::EnableWindow(::FindWindow("Shell_TrayWnd",NULL),FALSE);
}
//---------------------------------------------------------------------------</P>
<P>void __fastcall TForm1::FormCreate(TObject *Sender)
{
::ShowWindow(::FindWindow("Shell_TrayWnd",NULL),SW_SHOW);
::EnableWindow(::FindWindow("Shell_TrayWnd",NULL),TRUE);
}</P>
页: [1]
查看完整版本: 隐藏和显示任务栏!