|
■No72850 (pod さん) に返信
> そこまでは良かったのですが、フォームのドラッグ中やリサイズ中はウィンドウの位置やサイズが変化せず、
> ドロップ時（マウスアップ時）にだけ状態が変化します。
マウス操作ではなく、キーボードでのリサイズ動作は問題ないようですね。
(1)フォーム左上のアイコンを右クリックしてシステムメニューを表示
(2)[サイズ変更(S)]を選択
(3)矢印キーを押して方向を決定。上部ドラッグ相当なら↑。左部ドラッグ相当なら←。右下部なら→↓。
(4)さらに続けて、矢印キーを押し続けてリサイズする。
(5)リサイズの確定は Enter キー、キャンセルは Esc キー。
> ウィンドウのリサイズを正常に表示するにはどうすればいいのでしょうか？
SPY++ で拾ってみたところ、WS_EX_NOACTIVATE が付与されている状態だと、
WM_SIZING が SendMessage されているにも拘らず、マウス操作では
Form.Resize イベントが発火していない状態でした。
そこで試しに、WM_SIZING が通知されたときに、SetBoundsCore メソッドを
呼び出すようにしてみたところ、当方環境ではそれっぽく動きました。
なお SetBoundsCore の最後の引数は、All でも None でも
変化が見られませんでした。(何故だろう?)
using System.Drawing;
using System.Runtime.InteropServices;
using System.Windows.Forms;
namespace WindowsFormsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private const int WS_EX_NOACTIVATE = 0x8000000;
protected override CreateParams CreateParams
{
get
{
CreateParams p = base.CreateParams;
if (!base.DesignMode)
{
p.ExStyle = p.ExStyle | (WS_EX_NOACTIVATE);
}
return p;
}
}
protected override void WndProc(ref Message m)
{
const int WM_SIZING = 0x214;
const int WM_MOVING = 0x216;
if (m.Msg == WM_SIZING || m.Msg == WM_MOVING)
{
Rectangle rect = Rectangle.FromLTRB(
Marshal.ReadInt32(m.LParam, 0x0),
Marshal.ReadInt32(m.LParam, 0x4),
Marshal.ReadInt32(m.LParam, 0x8),
Marshal.ReadInt32(m.LParam, 0xC));
listBox1.Items.Insert(0, rect);
base.SetBoundsCore(rect.X, rect.Y, rect.Width, rect.Height, BoundsSpecified.All);
}
else
{
base.WndProc(ref m);
}
}
}
}
|