掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
「デスクトップの表示」でも消えないウィンドウを作るには？ (ID:21049)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Parentを Program Managerにすればいいようです。 なんか定番の方法らしい（汗） ただ、実験したところ、起動時にProgmanの下にいるらしく 表示されないので SetZOrderでTopMostにしてやる必要があります。 FProgmanHwnd: THandle; constructor TForm1.Create(AOwner: TComponent); begin inherited; FProgmanHwnd:=FindWindow('Progman','Program Manager'); if FProgmanHwnd<>0 then begin ParentWindow:= FProgmanHwnd; end; end; procedure TForm1.FormShow(Sender: TObject); begin //上に持ってきて表示する SetZOrder( True); //タスクバーに表示しないって事だったと思うんで。 ShowWindow(Application.Handle, SW_HIDE); end; こんな感じで。 実験用のコードです。 実装は、ご自分で最適化してください。 （SpyするとProgmanはExplorer.EXEの子にいます。） D5 + W2KとXPで確認。 以上。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.