◆タスクバーボタン非表示

「◆タスクバーボタン非表示」の編集履歴（バックアップ）一覧はこちら

「◆タスクバーボタン非表示」(2009/02/10 (火) 19:51:29) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

*情報
作者名：SIGO
引用元：[[なでしこ質問掲示板「タスクバーボタンの表示／非表示」>http://www.himanavi.net/cgi/nade-bbs2/cbbs.cgi?mode=al2&number=2420&no=0&KLOG=1]]

*概要
母艦を表示させつつ、タスクバーのボタンを非表示にします。

*本体
 #ここから
 ●SetWindowLong(w,i,l) =DLL("user32.dll",
 "long SetWindowLongA(
 hwnd hWnd,
 int nIndex,
 long dwNewLong
 )")
 ●ShowWindow(h,n) =DLL("user32.dll",
 "BOOL ShowWindow(
 HWND hWnd,
 int nCmdShow
 );")
 #------実行部----------------------
 #母艦の可視はオフ
 #SetWindowLong(母艦ハンドル,-20,$80)
 #ShowWindow(母艦ハンドル,1)
 #------実行部----------------------
 ＃ここまで

*//サンプルプログラム
 #-----------------------------------------------------------------------
 ！APPBARDATA_TYPE=「long,long,long,long,long,long,long,long,long」
 ■APPBARDATA
 　・cbSize ＃{=36} ＃TEST
 　・hWnd
 　・uCallbackMessage
 　・uEdge
 　・Left
 　・Top
 　・Right
 　・Bottom
 　・lParam
 PACK(APPBARDATA,AB_DAT,APPBARDATA_TYPE)。
 #-----------------------------------------------------------------------
 #-----------------------------------------------------------------------
 
 ●母艦設計
 　　母艦の可視＝オフ。
 　　母艦のタイトル＝「てすてす」。
 
 母艦の透明度＝0。
 母艦のクライアントW=150。
 母艦のクライアントH=150。
 母艦の背景色＝ウィンドウ背景色。
 母艦のドラッグ移動＝オン。
 
 母艦右下移動。
 
 塗りスタイル＝「透明」。
 
 母艦の可視はオフ
 SetWindowLong(母艦ハンドル,-16,$80)
 母艦の0,0から(母艦のクライアントW),(母艦のクライアントH)へ四角。
 ShowWindow(母艦ハンドル,1)
 
 
 母艦フェードイン。
 
 
 #-----------------------------------------------------------------------
 #-----------------------------------------------------------------------
 ●母艦右下移動({グループ=?母艦}OBJを)
 　　Pとは整数
 　　P=タスクバー位置取得。
 　　OBJについて　　　　
 　　　　もし、P=「左」ならば、X=デスクトップW-デスクトップワークエリアW
 　　　　違えば、X=デスクトップワークエリアW-W-100。//変更
 　　　　もし、P=「上」ならば、Y=デスクトップH-デスクトップワークエリアH
 　　　　違えば、Y=デスクトップワークエリアH-H。
 ●タスクバー位置取得
 　　もし、SHAppBarMessage(5,AB_DAT)ならば
 　　　　UNPACK(AB_DAT,APPBARDATA,"long,long,long,long") ＃グループに戻す
 　　　　TMPはAPPBARDATAのuEdge
 　　　　TMPで条件分岐
 　　　　　　「0」ならば、「左」で戻る。
 　　　　　　「1」ならば、「上」で戻る。
 　　　　　　「2」ならば、「右」で戻る。
 　　　　　　「3」ならば、「下」で戻る。
 　　違えば、「関数戻りエラー」という。
 ●SHAppBarMessage(ID,{参照渡し}p)=DLL("shell32.dll",
 "BOOL SHAppBarMessage(
 LONG dwMessage, //タスクバー位置：&H5
 LPPOINT pData
 )")
 ＃http://www.winapi-database.com/Program/Shell/SHAppBarMessage.html
 ●母艦フェードイン
 　　Aとは数値。
 　　1の間
 　　　　A=母艦の透明度。A=A＋3。
 　　　　もし、A≧200ならば、母艦の透明度＝200。抜ける。
 　　　　母艦の透明度＝A。
 　　　　0.01秒待つ。
 　　戻る。
 ●母艦フェードアウト
 　　Aとは数値。
 　　1の間
 　　　　A=母艦の透明度。A=A－3。
 　　　　もし、A≦0ならば、母艦の透明度＝0。抜ける。
 　　　　母艦の透明度＝A。
 　　　　0.01秒待つ。
 　　戻る。
 #-----------------------------------------------------------------------
 #-----------------------------------------------------------------------

----
#comment()

----

*情報
作者名：SIGO
引用元：[[なでしこ質問掲示板「タスクバーボタンの表示／非表示」>http://www.himanavi.net/cgi/nade-bbs2/cbbs.cgi?mode=al2&number=2420&no=0&KLOG=1]]
勝手に改変

*概要
母艦を表示させつつ、タスクバーのボタンを非表示にします。

*本体
 #ここから
 ●SetWindowLong(w,i,l) =DLL("user32.dll",
 "long SetWindowLongA(
 hwnd hWnd,
 int nIndex,
 long dwNewLong
 )")
 ●ShowWindow(h,n) =DLL("user32.dll",
 "BOOL ShowWindow(
 HWND hWnd,
 int nCmdShow
 );")
 #------実行部----------------------
 #母艦の可視はオフ
 #SetWindowLong(母艦ハンドル,-20,$80)
 #ShowWindow(母艦ハンドル,1)
 #------実行部----------------------
 ＃ここまで

*//サンプルプログラム
 #-----------------------------------------------------------------------
 ！APPBARDATA_TYPE=「long,long,long,long,long,long,long,long,long」
 ■APPBARDATA
 　・cbSize ＃{=36} ＃TEST
 　・hWnd
 　・uCallbackMessage
 　・uEdge
 　・Left
 　・Top
 　・Right
 　・Bottom
 　・lParam
 PACK(APPBARDATA,AB_DAT,APPBARDATA_TYPE)。
 #-----------------------------------------------------------------------
 #-----------------------------------------------------------------------
 
 ●母艦設計
 　　母艦の可視＝オフ。
 　　母艦のタイトル＝「てすてす」。
 
 母艦の透明度＝0。
 母艦のクライアントW=150。
 母艦のクライアントH=150。
 母艦の背景色＝ウィンドウ背景色。
 母艦のドラッグ移動＝オン。
 
 母艦右下移動。
 
 塗りスタイル＝「透明」。
 
 母艦の可視はオフ
 SetWindowLong(母艦ハンドル,-16,$80)
 母艦の0,0から(母艦のクライアントW),(母艦のクライアントH)へ四角。
 ShowWindow(母艦ハンドル,1)
 
 
 母艦フェードイン。
 
 
 #-----------------------------------------------------------------------
 #-----------------------------------------------------------------------
 ●母艦右下移動({グループ=?母艦}OBJを)
 　　Pとは整数
 　　P=タスクバー位置取得。
 　　OBJについて　　　　
 　　　　もし、P=「左」ならば、X=デスクトップW-デスクトップワークエリアW
 　　　　違えば、X=デスクトップワークエリアW-W-100。//変更
 　　　　もし、P=「上」ならば、Y=デスクトップH-デスクトップワークエリアH
 　　　　違えば、Y=デスクトップワークエリアH-H。
 ●タスクバー位置取得
 　　もし、SHAppBarMessage(5,AB_DAT)ならば
 　　　　UNPACK(AB_DAT,APPBARDATA,"long,long,long,long") ＃グループに戻す
 　　　　TMPはAPPBARDATAのuEdge
 　　　　TMPで条件分岐
 　　　　　　「0」ならば、「左」で戻る。
 　　　　　　「1」ならば、「上」で戻る。
 　　　　　　「2」ならば、「右」で戻る。
 　　　　　　「3」ならば、「下」で戻る。
 　　違えば、「関数戻りエラー」という。
 ●SHAppBarMessage(ID,{参照渡し}p)=DLL("shell32.dll",
 "BOOL SHAppBarMessage(
 LONG dwMessage, //タスクバー位置：&H5
 LPPOINT pData
 )")
 ＃http://www.winapi-database.com/Program/Shell/SHAppBarMessage.html
 ●母艦フェードイン
 　　Aとは数値。
 　　1の間
 　　　　A=母艦の透明度。A=A＋3。
 　　　　もし、A≧200ならば、母艦の透明度＝200。抜ける。
 　　　　母艦の透明度＝A。
 　　　　0.01秒待つ。
 　　戻る。
 ●母艦フェードアウト
 　　Aとは数値。
 　　1の間
 　　　　A=母艦の透明度。A=A－3。
 　　　　もし、A≦0ならば、母艦の透明度＝0。抜ける。
 　　　　母艦の透明度＝A。
 　　　　0.01秒待つ。
 　　戻る。
 #-----------------------------------------------------------------------
 #-----------------------------------------------------------------------

----
#comment()

----