掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
マウスを動かさずにOnMouseMoveイベントを発生させるには? (ID:7195)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
以下のコードでは,FormにButtonを配置し,Button1をクリックすると, 文面の通り,Button1のOnMouseMoveイベントが発生します. procedure TForm1.Button1Click(Sender: TObject); begin Button1MouseMove(Self,[ssShift],0,0); end; procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin ShowMessage('OnMouseMoveイベントを呼んだよ'); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.