◆タスクトレイポップアップメニュー

※上記の広告は60日以上更新のないWIKIに表示されています。更新することで広告が下部へ移動します。

情報


概要

タスクトレイのイベントでポップアップメニューを表示させます。

解説

ひまわりでmokaさんが作成なさった「タスクトレイでメニュー」
http://www.isonly.net/~yuk_yt/himawari/pr/1165.html
をなでしこ移植しました。

サンプルプログラム

//ここから
'タスクトレイでメニュー
●母艦設計
 母艦の可視はオフ

■POINT
 ・X
 ・Y

!POINT_TYPEとは文字列="DWORD,DWORD"

●GetCursorPos({参照渡し}p)=DLL("USER32.DLL",
"INT GetCursorPos(
char* pPoint)")

●GetMenu(hWnd)=DLL("USER32.DLL",
"DWORD GetMenu(DWORD hWnd)")

●GetSubMenu(hMenu,I)=DLL("USER32.DLL",
"DWORD GetSubMenu(
DWORD hWnd,
DWORD Index)")

●TrackPopupMenu(hMenu,f,x,y,r,hWnd,p)=DLL("USER32.DLL",
"Int TrackPopupMenu(
Int hMenu,
Int wFlags,
Int x,
Int y,
Int nReserved,
Int hWnd,
Int lPrc)")

「なし,M親,ダミー
M親,M子1,出す,,,母艦復活
M親,M線1,-
M親,M子2,終わる,,,終わり」をメニュー一括作成

GetMenu(母艦ハンドル)
メニューハンドル=GetSubMenu(それ,0)
M親の可視はオフ
母艦をタスクトレイ入れる

母艦のタスクトレイ右クリックした時は~
 Sとは文字列
 Sに8を確保
 GetCursorPos(S)
 UNPACK(S,POINT,POINT_TYPE)
 TrackPopupMenu(メニューハンドル,2,POINT.X,POINT.Y,0,母艦ハンドル,0)

待機。

●母艦復活
 母艦をタスクトレイ出す
 母艦の可視はオン


名前:
コメント:


ツールボックス

下から選んでください:

新しいページを作成する
ヘルプ / FAQ もご覧ください。