Windows 95/98/Me タスクバー通知領域でアイコンを使用する方法

文書翻訳 文書翻訳
文書番号: 149276
この資料は、アーカイブされました。これは "現状のまま" で提供され、更新されることはありません。
すべて展開する | すべて折りたたむ

目次

概要

Windows API の追加、変更、およびからアイコンを削除することができます。システム トレイで、タスク バーの通知領域、Windows 95、Windows 98、Windows Me、Windows NT 4.0、および Windows 2000 シェルで使用します。これShell_NotifyIcon 関数のみを使用して機能を提供します。Shell32.dll がエクスポートされます。この API 関数も機能を提供します。ユーザーが一時停止したときに表示されるツールヒントのテキスト文字列を指定します。マウス ポインターをアイコンの上。このステップ バイ ステップの例資料ではこれを使用する方法を示します Visual Basic プログラムを作成します。API の関数です。

タスク バーの通知領域にあるアイコンをクリックすると、いくつかのアクションを実行するのには、コールバック関数に依存します。Visual Basic 4.0 で、コールバック関数を直接サポートしませんので、Visual Basic 4.0 のみを使用してコードを実行したり、フォームを表示する方法はありません。Visual Basic 5.0 (以降) のこの機能が追加されましたでは、AddressOf 演算子を追加します。メッセージの Blaster OCX、ブルース McKinney 帳の詳細については、コールバックの OLE サーバーのこの記事では、「関連情報」セクションで説明した Microsoft システム履歴資料に記載されている、.ocx ファイルを含む、コールバック機能を提供できます Visual Basic 4.0 開発者にいくつかオプションを利用できます、 ハードコアの Visual Basic.これらのオプションの詳細については、「関連情報」セクションを参照してください。これらの製品の Visual Basic はありませんので、マイクロソフト製品サポート サービスは、の使用をサポートしていません。

詳細

次の使用例を示します、1 フォーム Visual Basic プロジェクトを作成します。Shell_NotifyIcon API 関数を使用する方法です。

ステップ バイ ステップの例

  1. Visual Basic を起動します。デフォルトで Form1 が作成されます。
  2. タスク バーの通知領域に表示するアイコンをフォームのアイコンのプロパティを変更します。
  3. 次の 3 つのコマンド ボタン、フォーム上に描画します。
  4. モジュールを 1 つのコード モジュールに追加するのには、[挿入] メニューから選択、プロジェクトです。
  5. 関数、型、および定数から構成される、次のコードを追加します。Module1 を宣言します。
          Type NOTIFYICONDATA
              cbSize As Long
              hWnd As Long
              uID As Long
              uFlags As Long
              uCallbackMessage As Long
              hIcon As Long
              szTip As String * 64
          End Type
    
          Global Const NIM_ADD = 0
          Global Const NIM_MODIFY = 1
          Global Const NIM_DELETE = 2
          Global Const NIF_MESSAGE = 1
          Global Const NIF_ICON = 2
          Global Const NIF_TIP = 4
    
          Declare Function Shell_NotifyIconA Lib "SHELL32" _
          (ByVal dwMessage As Long,  lpData As NOTIFYICONDATA) As Integer
    					
  6. 次のコードに必要なパラメーターを受け取る関数です。NOTIFYICONDATA の種類を設定して、この型の変数を返します。Form1 に追加します。
          Private Function setNOTIFYICONDATA(hWnd As Long, ID As Long, _
              Flags As Long, CallbackMessage As Long, Icon As Long, _
              Tip As String) As NOTIFYICONDATA
    
              Dim nidTemp As NOTIFYICONDATA
    
              nidTemp.cbSize = Len(nidTemp)
              nidTemp.hWnd = hWnd
              nidTemp.uID = ID
              nidTemp.uFlags = Flags
              nidTemp.uCallbackMessage = CallbackMessage
              nidTemp.hIcon = Icon
              nidTemp.szTip = Tip & Chr$(0)
    
              setNOTIFYICONDATA = nidTemp
          End Function
    					
  7. 3 つの手順でのコード ブロックを追加、変更、およびタスク バーの通知領域のアイコンを削除するのには 5 の手順で作成します。次のコード Form1 に追加することも。
          Private Sub Command1_Click()
              'Add an icon.  This procedure uses the icon specified in
              'the Icon property of Form1. This can be modified as desired.
    
              Dim i As Integer
              Dim s As String
              Dim nid As NOTIFYICONDATA
    
              s = InputBox("Enter string:")
              nid = setNOTIFYICONDATA(hWnd:=Form1.hWnd, _
                                      ID:=vbNull, _
                                      Flags:=NIF_MESSAGE Or NIF_ICON _
                                      Or NIF_TIP, _
                                      CallbackMessage:=vbNull, _
                                      Icon:=Form1.Icon, _
                                      Tip:=s)
    
                 i = Shell_NotifyIconA(NIM_ADD, nid)
             End Sub
    
             Private Sub Command2_Click()
                 'Modify an existing icon. This procedure uses the icon
                 'specified in the Icon property of Form1. This can be modified
                 'as desired.
    
                 Dim i As Integer
                 Dim s As String
                 Dim nid As NOTIFYICONDATA
    
                 s = InputBox("Enter string:")
                 nid = setNOTIFYICONDATA(hWnd:=Form1.hWnd, _
                                         ID:=vbNull, _
                                         Flags:=NIF_MESSAGE Or NIF_ICON _
                                         Or NIF_TIP, _
                                         CallbackMessage:=vbNull, _
                                         Icon:=Form1.Icon, _
                                         Tip:=s)
    
                 i = Shell_NotifyIconA(NIM_MODIFY, nid)
             End Sub
    
             Private Sub Command3_Click()
                 'Delete an existing icon.
    
                 Dim i As Integer
                 Dim nid As NOTIFYICONDATA
    
              nid = setNOTIFYICONDATA(hWnd:=Form1.hWnd, _
                                      ID:=vbNull, _
                                      Flags:=NIF_MESSAGE Or NIF_ICON _
                                      Or NIF_TIP, _
                                      CallbackMessage:=vbNull, _
                                      Icon:=Form1.Icon, _
                                      Tip:="")
    
              i = Shell_NotifyIconA(NIM_DELETE, nid)
          End Sub
    					
  8. F5 キーを押してまたはを実行するのには、[実行] メニューから開始を選択、アプリケーションです。最初のボタンをクリックし、追加するテキスト文字列を入力します。アイコン。既存のアイコン、および 3 つ目を変更するのには、2 番目のボタンをクリックします。アイコンを削除するには。

関連情報

ハードコアの Visual Basic、ブルース McKinney、マイクロソフトプレス 1995

Microsoft Win32 SDK、Shell_NotifyIcon、NOTIFYICONDATA。

Microsoft システム履歴、1996 年 2 月、ビジュアルのプログラマ、ページ 93

Visual Basic のプログラマの仕訳帳は、1996 年 1 月 Q&A、ページ 136

詳細については、「サポート技術情報」資料を参照するには、次の文書番号をクリックしてください。
162613 Visual Basic でのシステム トレイのアイコンを操作するには、方法

プロパティ

文書番号: 149276 - 最終更新日: 2014年2月22日 - リビジョン: 5.0
キーワード:?
kbnosurvey kbarchive kbhowto kbapi kbmt KB149276 KbMtja
機械翻訳の免責
重要: このサポート技術情報 (以下「KB」) は、翻訳者による翻訳の代わりに、マイクロソフト機械翻訳システムによって翻訳されたものです。マイクロソフトは、お客様に、マイクロソフトが提供している全ての KB を日本語でご利用いただけるように、翻訳者による翻訳 KB に加え機械翻訳 KB も提供しています。しかしながら、機械翻訳の品質は翻訳者による翻訳ほど十分ではありません。誤訳や、文法、言葉使い、その他、たとえば日本語を母国語としない方が日本語を話すときに間違えるようなミスを含んでいる可能性があります。マイクロソフトは、機械翻訳の品質、及び KB の内容の誤訳やお客様が KB を利用されたことによって生じた直接または間接的な問題や損害については、いかなる責任も負わないものとします。マイクロソフトは、機械翻訳システムの改善を継続的に行っています。
英語版 KB:149276
Microsoft Knowledge Base の免責: Microsoft Knowledge Baseに含まれている情報は、いかなる保証もない現状ベースで提供されるものです。Microsoft Corporation及びその関連会社は、市場性および特定の目的への適合性を含めて、明示的にも黙示的にも、一切の保証をいたしません。さらに、Microsoft Corporation及びその関連会社は、本文書に含まれている情報の使用及び使用結果につき、正確性、真実性等、いかなる表明・保証も行ないません。Microsoft Corporation、その関連会社及びこれらの権限ある代理人による口頭または書面による一切の情報提供またはアドバイスは、保証を意味するものではなく、かつ上記免責条項の範囲を狭めるものではありません。Microsoft Corporation、その関連会社 及びこれらの者の供給者は、直接的、間接的、偶発的、結果的損害、逸失利益、懲罰的損害、または特別損害を含む全ての損害に対して、状況のいかんを問わず一切責任を負いません。(Microsoft Corporation、その関連会社 またはこれらの者の供給者がかかる損害の発生可能性を了知している場合を含みます。) 結果的損害または偶発的損害に対する責任の免除または制限を認めていない地域においては、上記制限が適用されない場合があります。なお、本文書においては、文書の体裁上の都合により製品名の表記において商標登録表示、その他の商標表示を省略している場合がありますので、予めご了解ください。

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com