D delins Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-27 #1 在程序启动时怎么样将任务栏设定位自动隐藏?<br>谢谢!
W wbtvc Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-28 #2 要Uses ShellApi;<br><br>function ChangeTaskBarAutoHideOn(AutoHideTaskBar:Boolean):Boolean;<br>var<br> ABData : TAppBarData;<br>begin<br> Result:=False;<br> ABData.cbSize := SizeOf(ABData);<br> ABData.uCallbackMessage:=1;<br> if AutoHideTaskBar then<br> ABData.lParam:=1<br> else<br> ABData.lParam:=0;<br> Result := SHAppBarMessage(ABM_SETAUTOHIDEBAR, ABData)>0<br>end;<br><br>function IsTaskBarAutoHideOn : Boolean;<br>var<br> ABData : TAppBarData;<br>begin<br> ABData.cbSize := SizeOf(ABData);<br><br> Result := (SHAppBarMessage(ABM_GETSTATE, ABData) and ABS_AUTOHIDE) > 0;<br>end;<br><br>你说的意思是什么？
要Uses ShellApi;<br><br>function ChangeTaskBarAutoHideOn(AutoHideTaskBar:Boolean):Boolean;<br>var<br> ABData : TAppBarData;<br>begin<br> Result:=False;<br> ABData.cbSize := SizeOf(ABData);<br> ABData.uCallbackMessage:=1;<br> if AutoHideTaskBar then<br> ABData.lParam:=1<br> else<br> ABData.lParam:=0;<br> Result := SHAppBarMessage(ABM_SETAUTOHIDEBAR, ABData)>0<br>end;<br><br>function IsTaskBarAutoHideOn : Boolean;<br>var<br> ABData : TAppBarData;<br>begin<br> ABData.cbSize := SizeOf(ABData);<br><br> Result := (SHAppBarMessage(ABM_GETSTATE, ABData) and ABS_AUTOHIDE) > 0;<br>end;<br><br>你说的意思是什么？
T thx1180 Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-01 #4 看看这里：<br>http://www.delphibbs.com/delphibbs/dispq.asp?lid=1914610
G geluyx Unregistered / Unconfirmed GUEST, unregistred user! 2003-06-02 #6 showwindow(findwindow('Shell_TrayWND',nil),SW_Hide); //隐藏<br><br>showwindow(findwindow('Shell_TrayWND',nil),SW_Normal); //恢复
showwindow(findwindow('Shell_TrayWND',nil),SW_Hide); //隐藏<br><br>showwindow(findwindow('Shell_TrayWND',nil),SW_Normal); //恢复
