マウス解放アクションへの応答
マウスへの応答 への移動
ユーザーがマウス ボタンを放すと Vcl.Controls.TControl.OnMouseUp イベントが発生します。このイベントは、通常、ユーザーがボタンを押したときにマウス カーソルが置かれていたオブジェクトで発生します。これは、ボタンを放したときにカーソルが置かれていたオブジェクトと同じとは限りません。このため、たとえばフォームの境界を越える線を描画するようなことが可能です。
マウス ボタンを放すアクションに応答するには、OnMouseUp イベントのハンドラを定義してください。
次に示すのは、マウス ボタンを放した位置まで線を描画する、単純な OnMouseUp イベント ハンドラです。
void __fastcall TForm1::FormMouseUp(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y) {
Canvas->LineTo(X, Y); // draw line from PenPos to (X, Y)
}