システムメニューの閉じるボタンを消せないか?

ActiveBasicでのプログラミングでわからないこと、困ったことなどがあったら、ここで質問してみましょう(質問を行う場合は、過去ログやWeb上であらかじめ問題を整理するようにしましょう☆)。
メッセージ
作成者
toshiyori

システムメニューの閉じるボタンを消せないか?

#1 投稿記事 by toshiyori »

AB4.24を使用しています
RADツールを使って フォームを作りました。

その場合 閉じるボタンを消す方法が見つかりません
システムメニューを 消すように 設定はできますが
それでは 最小化ボタンも 消えます

理由は 終了時に 作業をさせたいためです
コマンドボタンをで 閉じれば それが可能ですが
「x」ボタンで 閉じられた時に 対応できないためです。
よろしくお願いします
konisi
記事: 893
登録日時: 2005年7月25日(月) 13:27
お住まい: 埼玉県東松山市

#2 投稿記事 by konisi »

QueryCloseかDestroyで処理すれば、わざわざ×ボタンを消す必要はありません。

#ウインドウ左上のアイコンをダブルクリックしたりAlt+F4を押したりした場合にも、特殊な処理を組んでいない限りはウインドウが閉じられます。
Website→http://web1.nazca.co.jp/himajinn13sei/top.html
ここ以外の場所では「暇人13世」というHNを主として使用。

に署名を書き換えて欲しいと言われたので暇だしやってみるテスト。
水波形
記事: 106
登録日時: 2009年3月29日(日) 15:45

消す・・・というか無効にする方法

#3 投稿記事 by 水波形 »

自分はちょっとかっこつけたくて、無効にすることがあります。
消せはしませんが、ちょっと参考に

コード: 全て選択

Dim hMenu As Long
hMenu=GetSystemMenu(hWnd,0)
EnableMenuItem(hMenu,SC_CLOSE,MF_DISABLED)
↓個人的ソフト置き場
http://www.software.jpn.org/
↓萌えゲー製作とかしていたい
http://www.holygate.jpn.org/