タイトル | : Re: 各フォームのアイコンの設定 |
記事No | : 7394 |
投稿日 | : 2008/04/23(Wed) 14:41 |
投稿者 | : ゆうき |
ゆうきです。
> ただアイコンは今後変更される可能性がある状態です。 > そこでアイコンが変更になった場合に影響を少なくしたいと > 考えているのですが、 > 何か良い案はございませんでしょうか?
子フォームのLoadイベントにオーナーフォームのアイコンを 設定すればよいのではないでしょうか。
(例) 子フォームクラス Private Sub 子フォーム_Load(ByVal ... Me.Icon = Me.Owner.Icon End Sub
-------------------------------------------------------- 親フォームクラス 子フォーム表示処理 子フォーム.ShowDialog(Me)
これでどうでしょう。こうすれば、親フォームのアイコンが変われば、 子フォームのアイコンも変わります。
|