delphi手册

最新推荐文章于 2024-01-15 08:42:05 发布

0十三月1

最新推荐文章于 2024-01-15 08:42:05 发布

阅读量805

点赞数

分类专栏： delphi

本文链接：https://blog.csdn.net/qingwu13/article/details/13995383

版权

delphi 专栏收录该内容

1 篇文章 0 订阅

订阅专栏

·功能模块

·判断鼠标是否按下函数

function IsMouseDown: Boolean;
begin
  if GetSystemMetrics(SM_SWAPBUTTON) <> 0 then
    Result := GetAsyncKeyState(VK_RBUTTON) and $8000 <> 0
  else
    Result := GetAsyncKeyState(VK_LBUTTON) and $8000 <> 0;
end;

·test2

test2

优惠劵

0十三月1

关注关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
delphi手册

·功能小模块·判断鼠标是否按下函数function IsMouseDown: Boolean;begin if GetSystemMetrics(SM_SWAPBUTTON) <> 0 then Result := GetAsyncKeyState(VK_RBUTTON) and $8000 <> 0 else Result := GetAsyncKeySta
复制链接

扫一扫