■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#30022-0タイトルバーの色を変えるには(変えないには)Nautilus2000-09-15(金) 01:57
     #30023-0RE#30022:タイトルバーの色を変えるには(変えないには)魔界の仮面弁士2000-09-15(金) 03:15
     #30025-0RE#30022:タイトルバーの色を変えるには(変えないには)匿名300252000-09-15(金) 06:18
     #30027-0RE#30023:タイトルバーの色を変えるには(変えないには)ゆう(U)2000-09-15(金) 09:55
     #30056-0RE#30025:タイトルバーの色を変えるには(変えないには)Nautilus2000-09-17(日) 04:31
     #30062-0RE#30056:タイトルバーの色を変えるには(変えないには)suuta2000-09-17(日) 13:32
     #30077-0RE#30062:タイトルバーの色を変えるには(変えないには)さちこ2000-09-18(月) 02:16
#30022-0
タイトルバーの色を変えるには(変えないには)
'-----バックストーリー------------------------------コメント--------------------
ある日,VBのToolTipsで複数行の    ’やめときゃいいのに。VBの仕様
表示が出来ないのに業を煮やした俺は,自作    ’以上のことを望んではいけないよ。
することにした。                ’仕様で満足しとくべきだね。
「えーと,ラベルの MouseMove イベントで
 マウスカーソルがきたら,
    frmToolTips.Show
 と。なんだ楽勝じゃん。さて,テスト,
 テスト。」
「おっ,表示でけた。簡単だなあ・・・
 げっ,消えてくれない!?」          ’あたり前じゃないか。消すコードも
「えーと,なんかいいイベントはないかな。    ’書いてないのに消えたら驚きだよ。
 MouseByeByeとか。」        ’プログラムはプログラマーが「思った」
<このあとも悪戦苦闘が続くがなんとかかんと   ’通りではなくて,「書いた」通りに動く
 か完成。>                  ’んだよ。
ところが一つ気になるところがある。ツール
チッブといっても実はFormだから,表示    ’そんなこと気にするなよ。Window
した方のFormのタイトルバーの色が変わっ   ’の仕様なんだから。まあ,すこしでも
てしまう。                   ’ツールチッブに似せようという気持ちは
「SetFocusしたらいいじゃん。」     ’わからないでもないが。
ところが,Form1.SetFocusするとマウスポイン
タがコマンドボタンに飛んでいって,frmTool-
Tispが消えてしまう。マウスポインタがラベル
から外れたら,ツールチップが消えてしまうよ
うにしたのは俺だから,文句も言えない。
'--------------------------------------------------------------------------------------
というわけで質問ですが,
「FormA からFormT を表示したときに,FormA のタイトルバーの色が変わらないようにするには
 どうしたらよいでしょうか。本当にアクティブになってしまうとちょっと困るのでタイトルバー
 の色だけアクティブのように見せかけたいのです。」

なお環境は Windows98 + VB6.0(SP4) です。
#30023-0
RE#30022:タイトルバーの色を変えるには(変えないには)
> ある日,VBのToolTipsで複数行の    ’やめときゃいいのに。VBの仕様
> 表示が出来ないのに業を煮やした俺は,自作    ’以上のことを望んではいけないよ。
> することにした。                ’仕様で満足しとくべきだね。

タイトルバー云々というのは、本来の目的ではないのですよね。
ようは、複数行対応のツールチップが用意できればよい、と。

であれば、このサイトのリンクページから、「Visual Basic増強作戦」を訪れてみましょう。
[Software Library]に、お望みの[ToolTip Form Module]が置いてあります。
#30025-0
RE#30022:タイトルバーの色を変えるには(変えないには)
VB Thunder に「CoolTip」っていうフリーのActiveX Dllがありましたよ。
#30027-0
RE#30023:タイトルバーの色を変えるには(変えないには)
> タイトルバー云々というのは、本来の目的ではないのですよね。
> ようは、複数行対応のツールチップが用意できればよい、と。
「旧こんなことできます掲示板ログ」にAPIで無理矢理
複数行にしてしまうってのを見た事がありますが・・・

※使った事無いので何処(環境・仕様等)まで使えるかは
 不明です。
#30056-0
RE#30025:タイトルバーの色を変えるには(変えないには)
> VB Thunder に「CoolTip」っていうフリーのActiveX Dllがありましたよ。
インターネットで検索したのですが,見つかりませんでした。「VB Thunder」で見つかった
サイトにはなぜか接続できませんでした。「CoolTip」では Hit がありませんでした。

元の質問についてですが,いろいろな方にレスをもらって,僕も調べているのですが,全然
わかりません。(拡張ToolTipについてのレスありがとうございました。)
FlashWindow あるいは FlashWindowEx という API が使えそうなのですが,どうもうまく
いきません。Form1 から Form2 を表示したとき,Form2 上にボタンをつけて,Clickイベ
ントから FlashWindow を Call するとうまくいくのですが,(たとえば)Form2のLoad
イベントから Call すると,うまくいきません。
#30062-0
RE#30056:タイトルバーの色を変えるには(変えないには)
サブクラス化して、
WM_ACTIVATEがきた時wParamをTrueにすればできます。
#30077-0
RE#30062:タイトルバーの色を変えるには(変えないには)
> サブクラス化して、
> WM_ACTIVATEがきた時wParamをTrueにすればできます。

結果的にはできるかも知れませんが、あくまで「結果的」ですね。
何でこんなことを書いているのかは、SDK参照。
このページと関連する記事:
#282-0フォームのEnabled1999-07-25(日) 03:58
#306-0モーダル画面をタスクバーから消したい2002-03-11(月) 22:16
#35553-0フォームのサイズを維持するには?2000-12-18(月) 10:46
#428-1画面の保存について・・・2004-03-13(土) 06:26
#4983-0背景色の変更1999-12-08(水) 17:42
#5771-0MDIフォームの親フォームのタイトルバーのちらつき2002-03-07(木) 19:54
#16954-0タスクバーやタイトルバーにフォームを埋め込みたい2000-12-07(木) 13:23
#8-0透過色2001-12-25(火) 13:49
#14427-0タイトルバーの消し方2001-02-11(日) 18:35
#42045-0あるソフトを終了させる方法2001-04-21(土) 02:48
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)