标签: delphi mouse
我们可以使用以下代码清除键盘缓冲区:
while PeekMessage(Msg, 0, WM_KEYFIRST, WM_KEYLAST, PM_REMOVE or PM_NOYIELD) do;
但是我怎样才能清除鼠标点击缓冲区?
答案 0 :(得分:5)
我明白了:
while PeekMessage(Msg, 0, WM_MOUSEFIRST, WM_MOUSELAST, PM_REMOVE or PM_NOYIELD) do;