Windows 9xでは、画面の下部にタスクバーがあり、ユーザーが設定できます。タスクバーを右クリックしてプロパティを選択すると、ポップアップダイアログボックスに設定できます。次に、コンパイルしたプログラムでタスクバーを制御する方法は次のとおりです。
注：FindWindowおよびSetWindowpos API機能を使用して、プログラムのWindowsタスクバーの隠しと表示を制御します。
まず、新しいプロジェクトを作成し、ボタン1（キャプションプロパティが隠されたタスクバー）とボタン2（キャプションプロパティがディスプレイタスクバーです）をデフォルトのform1に配置し、他のプロパティは変更せずに、次のプログラムコードを入力します。
ユニットStartBar;
インタフェース
Windows、メッセージ、sysutils、クラス、グラフィック、コントロール、フォーム、ダイアログ、stdctrlsを使用します。
タイプtform1 = class（tform）
Button1：Tbutton;
Button2：tbutton;
手順button1click（sender：tobject）;
手順button2click（sender：tobject）;
手順formcreate（sender：tobject）;
プライベート{プライベート宣言}
パブリック{公開宣言}
終わり;
var form1：tform1：hwnd;
実装{sr *.dfm}
手順tform1.formcreate（sender：tobject）;
始める
ret：= findWindow（ 'shell_traywnd'、 '）;
終わり;
手順tform1.button1click（sender：tobject）;
始める
setWindowpos（ret、0、0、0、0、0、swp_hidewindow）;
終わり;
手順tform1.button2click（sender：tobject）;
始める
setWindowpos（ret、0、0、0、0、0、swp_showwindow）;
終わり;
終わり。
これで実行できます（F9を押すと、タスクバーが再び表示されます。
注：上記のプログラムはデバッグされ、Windows 98およびDelphi4.0 c/sの中国語版で渡されました。