windows - 在显示表单之前检测是否已按下鼠标按钮

如果按下鼠标按钮并显示一个窗口，则释放鼠标按钮时该窗口将收到MouseUp事件。

一旦显示窗口，是否可以检测是否已经按下鼠标按钮？

最佳答案

我会尝试这样的:

procedure TForm1.FormShow(Sender: TObject);
begin
  if GetKeyState(VK_LBUTTON) and $8000 <> 0 then
    ShowMessage('Left mouse button is pressed...')
  else
    ShowMessage('Left mouse button is not pressed...')
end;