いつもお世話になっております。

ControlBox = False 設定をしたFormのタイトルバーにアイコンを表示したいのですが
出来ずに困っています。
SetWindowLong関数を使っても駄目でした。
何方かご存じの方、宜しくお願いします。

VB6.0 SP5 OSはWinNT4.0〜、Win98〜です。

>ControlBox = False 設定をしたFormのタイトルバーにアイコンを表示したいのですが
タイトルバーに じゃなくて、タスクバーに表示したいのでは！

ここの［タイトルバーなしウインドウの作成］ではだめですか？
又、掲示板のワード検索で　タスクバー　で検索しても違ったやり方がヒットします。

前回も書いていたのですが、次回から質問される場合、掲示板のワード検索や
メニューの当サイト内外の検索等で調べてから質問されるようにお願いします。

> ここの［タイトルバーなしウインドウの作成］ではだめですか？

一応検索して無かったのでレスしたのですが・・・。
見ましたが、タイトルバーにアイコンを表示したいのですが、
これじゃタイトルバー自体無くなって意味ないですよね。
タイトルバーをPictureBoxなどで作成したのですが、Formがアクティブで無くなったときの
イベントが取れなく、タイトルバー(PictureBox)のBackColorを変える事が
出来ず断念したわけで、レスを書かせて頂きました。

> これじゃタイトルバー自体無くなって意味ないですよね。
どうも失礼しました。
質問内容が矛盾しておりましたので勝手に解釈してしまいました。
ControlBox = False にしなければならない理由によっては
違った解決方法があるかと思うのですが。

> ControlBox = False にしなければならない理由によっては
> 違った解決方法があるかと思うのですが。
こちらこそ失礼しました。
タイトル横のアイコンを表示したまま、３つのボタンを消さないと
いけないのです。
何か方法はありますか？

> 何か方法はありますか？
残念ながらないようです。

通常は、最大化ボタンと最小化ボタンを削除して、閉じるボタンは無効に
するのが一般的かと思います。

> > 何か方法はありますか？
> 残念ながらないようです。
そうですかぁ。

FormのLostFocusイベントは、何故処理されないのでしょうか？
イベントさえ取れれば、タイトルバー無しのFormにPictureBoxを代用して
作成できるのですが。

>FormのLostFocusイベントは、何故処理されないのでしょうか？

Private Sub Form_Deactivate() で代用して下さい。



閉じるボタンの上に別フォームを表示させた方が簡単かも

>  Private Sub Form_Deactivate() で代用して下さい。
同Project内であれば有効ですが、他アプリにFocuceが移った場合にはイベントが
入ってこないので無理です。ごめんなさい。

>  閉じるボタンの上に別フォームを表示させた方が簡単かも
一度試してみます。

有り難う御座いました。

未確認ですが、
フォーカスを失った際にはWM_KILLFOCUSが飛ぶようなので、
サブクラス化してこれを使ってみたらどうでしょうか。

> 未確認ですが、
> フォーカスを失った際にはWM_KILLFOCUSが飛ぶようなので、
> サブクラス化してこれを使ってみたらどうでしょうか。
有り難う御座います。早速試してみます。