<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>DelphiTips.net &#187; show</title>
	<atom:link href="http://www.delphitips.net/tag/show/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.delphitips.net</link>
	<description>...free Delphi tips &#38; source code repository</description>
	<lastBuildDate>Fri, 24 Jul 2009 22:19:02 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.8.4</generator>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
			<item>
		<title>Hide /show taskbar clock</title>
		<link>http://www.delphitips.net/2007/08/18/hide-show-taskbar-clock/</link>
		<comments>http://www.delphitips.net/2007/08/18/hide-show-taskbar-clock/#comments</comments>
		<pubDate>Sat, 18 Aug 2007 21:13:56 +0000</pubDate>
		<dc:creator>admin</dc:creator>
				<category><![CDATA[System]]></category>
		<category><![CDATA[clock]]></category>
		<category><![CDATA[hide]]></category>
		<category><![CDATA[show]]></category>
		<category><![CDATA[taskbar]]></category>

		<guid isPermaLink="false">http://www.delphitips.net/2007/08/18/hide-show-taskbar-clock/</guid>
		<description><![CDATA[Simple function to show and hide taskbar clock.

procedure ShowClock&#40;show: boolean&#41;;
var TrayWnd, TrayNWnd, ClockWnd : Hwnd;
begin
  TrayWnd  := FindWindow&#40;'Shell_TrayWnd', nil&#41;;
  TrayNWnd := FindWindowEx&#40;TrayWnd,0, 'TrayNotifyWnd', nil&#41;;
  ClockWnd := FindWindowEx&#40;TrayNWnd,0, 'TrayClockWClass', nil&#41;;
  if show then ShowWindow&#40;ClockWnd,sw_show&#41;
          else ShowWindow&#40;ClockWnd,sw_hide&#41;
end;

]]></description>
		<wfw:commentRss>http://www.delphitips.net/2007/08/18/hide-show-taskbar-clock/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>Hide / show all icons on desktop</title>
		<link>http://www.delphitips.net/2007/08/18/hide-show-all-icons-on-desktop/</link>
		<comments>http://www.delphitips.net/2007/08/18/hide-show-all-icons-on-desktop/#comments</comments>
		<pubDate>Sat, 18 Aug 2007 20:27:50 +0000</pubDate>
		<dc:creator>admin</dc:creator>
				<category><![CDATA[System]]></category>
		<category><![CDATA[desktop]]></category>
		<category><![CDATA[hide]]></category>
		<category><![CDATA[icon]]></category>
		<category><![CDATA[show]]></category>

		<guid isPermaLink="false">http://www.delphitips.net/2007/08/18/hide-show-all-icons-on-desktop/</guid>
		<description><![CDATA[Another &#8220;one-line code trick&#8221; and probably completely useless.  

procedure TForm1.Button1Click&#40;Sender: TObject&#41;;
//hide desktop icons
begin
  ShowWindow&#40;FindWindow&#40;nil, 'Program Manager'&#41;,SW_HIDE&#41;;
end;
&#160;
procedure TForm1.Button2Click&#40;Sender: TObject&#41;;
//show desktop icons
begin
  ShowWindow&#40;FindWindow&#40;nil, 'Program Manager'&#41;,SW_SHOW&#41;;
end;

]]></description>
		<wfw:commentRss>http://www.delphitips.net/2007/08/18/hide-show-all-icons-on-desktop/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
		<item>
		<title>Hide and show taskbar programmatically</title>
		<link>http://www.delphitips.net/2007/03/14/hide-and-show-taskbar-programmatically/</link>
		<comments>http://www.delphitips.net/2007/03/14/hide-and-show-taskbar-programmatically/#comments</comments>
		<pubDate>Wed, 14 Mar 2007 00:22:16 +0000</pubDate>
		<dc:creator>admin</dc:creator>
				<category><![CDATA[System]]></category>
		<category><![CDATA[hide]]></category>
		<category><![CDATA[show]]></category>
		<category><![CDATA[taskbar]]></category>

		<guid isPermaLink="false">http://www.delphitips.net/2007/03/14/hide-and-show-taskbar-programmatically/</guid>
		<description><![CDATA[Just few lines of code to hide and show Windows taskbar programmatically.
These two examples (two button OnClick  events again) show how to hide and unhide Windows taskbar.

procedure TForm1.HideTaskBarClick&#40;Sender: TObject&#41;;
var hTaskBar : THandle;
&#160;
begin
hTaskbar := FindWindow&#40;'Shell_TrayWnd', Nil&#41;;
ShowWindow&#40;hTaskBar, SW_HIDE&#41;;
end;
&#160;
procedure TForm1.ShowTaskBarClick&#40;Sender: TObject&#41;;
var hTaskBar : THandle;
begin
hTaskbar := FindWindow&#40;'Shell_TrayWnd', Nil&#41;;
ShowWindow&#40;hTaskBar, SW_SHOWNORMAL&#41;;
end;

Note, that Start button on your keyboard is still working [...]]]></description>
		<wfw:commentRss>http://www.delphitips.net/2007/03/14/hide-and-show-taskbar-programmatically/feed/</wfw:commentRss>
		<slash:comments>0</slash:comments>
		</item>
	</channel>
</rss>
