いつもいつも、勉強させて頂いております。
今、簡単なアプリケーションを作ったのですが、このＥＸＥファイルを
常駐アプリとしたいのです。
普段はタスクトレー（アイコン表示）で、見たり、操作したい時や、
イベントが起きた時に、このＥＸＥファイルを表示させたいと思います。
普通に、最小化すると、タスクバーの方に収納されてしまいますので…。
常駐化そのものの仕方が、よく分かりません。
設定（プロパティ？）か、簡単なソースコードを書いていただけると幸いです。
環境：ＶＢ６，ＯＳ：Ｗｉｎ２０００Ｐｒｏ
よろしくお願い致します。
VB6のCD-ROMに、タスクトレイにアイコンを配置するための
ActiveXコントロールのサンプルvbpファイルがありますので、
それを参考にしてみてください。
コントロールではなく、クラスモジュール形式の方が良ければ、
ももたろさんの CTray.cls あたりを利用させてもらっては如何でしょう。
http://www.momo-lab.net/inu/ctray.html
魔界の仮面弁士殿＞早速の回答、ありがとうございます。
ＶＢ６ＣＤ−ＲＯＭのサンプル及び、ももたろさんＣＴｒａｙ．ｃｌｓを
参考にしてみます。
ＣＴｒａｙ．ｃｌｓは自由に使って良いみたいなので助かります。
うまく出来たら、［解決］とします。
ありがとうございした。
上記前者（ＶＢ６ＣＤ−ＲＯＭサンプル）と後者の（ＣＴｒａｙ）について、
あれから、いろいろ試しましたが、
まず、後者の方ですが、アイコンがタスクトレイに表示、削除というのは
分かりましたが、これがイベントによって、ＥＸＥファイルの画面がＰＣ上に
表示したりというのは可能なのでしょうか？
（よくある、メール受信や、メッセージソフトで、相手のメッセージを
受けると、ポップアップ表示したりするソフトと同じく作りたいです。
普段は、タスクトレイで常駐するソフトを。）
前者の方ですが、対象のサンプルソースがどのソース名か良くわからず、
ActiveXコントロールのサンプルvbpが探し出せませんでした。
このソースのファイル名、もしくはソースを書いていただければ幸いです。
是非、引き続きご教授願います。
> これがイベントによって、ＥＸＥファイルの画面がＰＣ上に
> 表示したりというのは可能なのでしょうか？
普段はフォームを非表示にしておき、何らかのイベントに応じて、
そのフォームを表示する(FormをShowさせる)ようにすればOKです。
例えば…定期的に(例えば、毎日正午に)表示させたいような場合は、
TimerコントロールのTimerイベントを利用すれば良いでしょうし、
タスクトレイ上のアイコンを操作された時に表示したいのであれば、
あのCTrayクラスのイベント(Click/DblClick/MouseDown/MouseMove/MouseUpイベント)を
使うことが出来ますよね。
# CTrayクラスのイベント処理の手順に憑いては、ダウンロードページに
# 書かれていた[使用例]や、付属のサンプルをご覧になって下さい。
> 対象のサンプルソースがどのソース名か良くわからず
下記一覧の、「SYSTRAY.VBP」がそれにあたります。
http://support.microsoft.com/default.aspx?scid=kb;EN-US;191546
エディション等により、ディスク構成が異なる(含まれていない事もある)ので、
具体的にどのディスクに含まれているかは示せませんが、指しあたって、
[Visual Basicをインストールしたフォルダ]、
[Visual Basic/Visual Studioの格納されいているCD-ROM]
[MSDNライブラリのCD-ROM]
などの中から探してみてください。
魔界の仮面弁士殿＞連絡が遅くなり、申し訳ありません。
ＦｏｒｍをＨｉｄｅすれば良いことを知りません（気づきません）でした。
見えないけど、起動してるってことですね。
それで、Ｓｈｏｗすれば良いと。
それで、やってみたのです。ところが…。
処理的には良さそうなのですが、タスクトレイに表示するアイコンが、
にこチャンマーク？（標準の）は表示したのですが、
これを任意に作ったアイコンを表示するには、
どこを書き換えれば良いのでしょうか？（ＣＴｒａｙサンプルソース中。）
多分、初歩的な設定だと思いますが、分かりません。
LoadResPictureにアイコンファイルをフルパス指定だと、
実行時エラー’３２６’識別子…リソースが見つかりません。
となってしまいます。
何度もの質問で申し訳ありません。
また、ＣＴｒａｙの処理となると、この場で聞くのは場違いかもしれません。
宜しければ、ご教授願います。
よろしくお願いします。
> また、ＣＴｒａｙの処理となると、この場で聞くのは場違いかもしれません。
本来は、管理者(ももたろさん)のサイトで聞くべきでしょうね。(^_^;)
あそこには、サポート掲示板もあるわけですし。
(まぁ、彼も最近は忙しいみたいなので、他の方が回答される事も多いのですが)
> これを任意に作ったアイコンを表示するには、
そのアイコンを、フォームのIconプロパティ、Imageコントロール、PictureBoxコントロール、ImageListコントロール、リソース、HDD上の画像ファイル……などとして保持しておき、それを指定してください。
画像を利用する方法については、MSDN ライブラリの
[Visual Studio 6.0 ドキュメント]
└[Visual Basic ドキュメント]
└[Visual Basic の使用方法]
└[プログラミング ガイド]
└[Visual Basic を使ってできること]
└[テキストおよびグラフィックスの操作]
└[グラフィカル コントロールの使い方]
└[アプリケーションへのピクチャの追加]
や、その関連ページに説明がありますので、そちらを参考にして下さい。
> LoadResPictureにアイコンファイルをフルパス指定だと、
LoadResPictureは、exe中のリソースデータから取得する命令です。
(VB6の場合は、アドインの[リソース エディタ]でリソースを編集できます)
ファイルから取得する場合は、LoadResPictureではなく、LoadPictureを使ってください。
魔界の仮面弁士殿＞何度も何度も、ありがとうございます。
無事に、タスクトレイのアイコンを任意のアイコンに表示出来ました。
（LoadPictureを使用しました。）
もう１つ、欲張って聞いてもよろしいでしょうか？
これは、ＣＴｒａｙに限らないと思いますので、こちらに質問させて頂きます。
タスクトレイに表示あれたアイコンをダブルクリックでＦｏｒｍを表示
させたりは出来たのですが、そのタスクトレイのアイコン上で、
右クリック時に、ポップアップメニューを表示したいと思っています。
PopupMenuメソッドの使い方が分かりません。（引数３つとも）
（あ、これは、ＣＴｒａｙのメソッド使用した場合ですが…。）
特に引数の「表示するメニュー」とは、どこで設定するのでしょうか？
例えば、アイコンを右クリックした際、ポップアップメニューに、
［表示］→Ｆｏｒｍ１．ｓｈｏｗ
［設定］→Ｆｏｒｍ２．ｓｈｏｗ
［終了］→ｕｎｌｏａｄ Ｆｏｒｍ１
としたいと思います。
サンプルソースを書いていただけると、大変助かります。
初心者すぎて、申し訳ありませんが、是非、ご教授願います。
> もう１つ、欲張って聞いてもよろしいでしょうか？
その前に、ヘルプを読んでみてくださいな。
[Visual Studio 6.0 ドキュメント]
└[Visual Basic ドキュメント]
└[Visual Basic の使用方法]
└[プログラミング ガイド]
├[Visual Basic の基本]
│└[フォーム、コントロール、およびメニュー]
│ └[メニューの基礎]
└[Visual Basic を使ってできること]
└[ユーザー インターフェイスの作成]
└[アプリケーションでのメニューの利用]
魔界の仮面弁士殿＞度々すみません。
ヘルプを読みました。
メニューエディタで、
表示(&O)
設定(&E)
・・・・
終了(&X)
と設定したのですが、
・・・・（境界線）が、コントロールがありませんと言われて、
設定できませんでした。
仕方なく、境界線を無くして、メニュー３個にしましたが、
Ｆｏｒｍの上段に横型に表示されます。
私の理想は、この上段のメニューは必要無く、
タスクトレイのアイコンを右クリックした時に、
縦長にポップアップメニューを出したいと思います。
表示(&O)
設定(&E)
−−−− （境界線）
終了(&X)
是非、引き続きご教授願います。
> ・・・・（境界線）が、コントロールがありませんと言われて、
> 設定できませんでした。
[Visual Studio 6.0 ドキュメント]
└[Visual Basic ドキュメント]
└[Visual Basic の使用方法]
└[プログラミング ガイド]
└[Visual Basic を使ってできること]
└[ユーザー インターフェイスの作成]
└[アプリケーションでのメニューの利用]
└[メニュー エディタでのメニューの作成]
上記ページの真ん中あたりに書かれている
『 メニュー エディタで区分線を作成するには 』
を参照してみてください。
> 横型に表示されます
上記ページの上の方に書かれている
『 メニュー エディタのリスト ボックスの使い方 』
を参照してみてください。
> この上段のメニューは必要無く、
前回の回答で紹介した [アプリケーションでのメニューの利用] のページにある
『メニュー バーに表示されないメニュー項目を作成するには、〜〜』の文を見てください。
魔界の仮面弁士殿＞おかげさまで、下記まで出来るようになりました。
１．Ｆｏｒｍを非表示で、タスクトレイにアイコン表示。
２．イベント時に、Ｆｏｒｍを表示。
３．アイコン右クリックでメニューの表示、選択。（境界線付）
以上です。
やはり、調べながら、考えて作るのが、よさそうですね。
さらに、進めたいのが、３項アイコンの右クリックポップアップメニューですが、
アクセスキー（＆Ｅ）等指定しても、メニュー表示後、キー操作が出来ません。
登録はメニューエディタで、（＆Ｅ）等指定しただけです。
ショートカットとかは指定していません。なぜ、キーが受けつかないのでしょうか？
また、右クリックでポップアップメニューを表示した時に、キャンセルしたい時、
他のアプリは、どこか適当なところにマウスを動かすと、メニューが消えるのが
ありますが、あれはどうするのでしょうか？（メニュー項目にキャンセル無し）
今のままだと、何か選択しないとメニューは消えません。
下記が右クリック時にメニューを表示する処理。消す（キャンセル）処理が
必要なのでしょうか？
Private Sub mTray1_MouseDown(ByVal Button As Integer)
Select Case Button
Case vbRightButton
PopupMenu mnuMenu
End Select
End Sub
更に、ＣＴｒａｙが関係しているのかわかりませんが、アプリのアイコンが、
にこちゃんマークになってしまいます。
各Ｆｏｒｍのアイコン設定や、プロジェクトのプロパティ「実行可能ファイルの作成」
での表示アイコンは、私が指定したアイコンになっているにも関わらず、
実行ファイルを作成すると、必ずにこちゃんマークになってしまいます。
関係していると思われる行は、下記しか思いあたりません。なぜなんでしょうか？
'表示するアイコン
Private mIcon(1) As StdPicture ←上段／下段どちらか。
'Private mIcon(1) As IPictureDisp ← （どちらも駄目）
Private Sub Form_Load()
'アイコンを取得
Set mIcon(0) = LoadPicture("任意アイコン１.ico") ←ここは私指定のアイコン
Set mIcon(1) = LoadPicture("任意アイコン２.ico") ←ここは私指定のアイコン
−以下省略−
以上（以下）、３件、引き続き教えて下さい。（長文になりすみません。）
１．ポップアップメニューで、アクセスキー（＆Ｅ）等、キー操作が出来ない件。
２．ポップアップメニューをキャンセルする方法。
３．実行ファイルのアイコンが「にこちゃんマーク」になってしまうのを変更する方法。
よろしくお願いします。
度々の質問で申し訳ありません。
やはり、上記１〜３が、どうしても解決出来ません。
１項、２項は出来なくてもかまいませんが、特に３項は、
アプリの大事な顔「アイコン」でもありますので、
どうにか、にこちゃんマークから、任意指定のアイコンに
設定したいと思います。
（３項は、ももたろさんのＨＰ掲示板にも記載したが、いまだレス無し。）
良い方法あれば教えて下さい。
よろしくお願いします。
>（３項は、ももたろさんのＨＰ掲示板にも記載したが、いまだレス無し。）
それってマルチポストにならない？