delphi – 为什么VK_Control VKHome不能为我工作？

概述procedure TSell.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);begin if (Msg.Message=WM_KEYDOWN)and(Msg.wParam=VK_CONTROL+VK_HOME)then begin end; 要检查VK_CONTROL虚拟键的状态,必须使用

procedure TSell.ApplicationEvents1Message(var Msg: tagMSG;  var Handled: Boolean);begin  if (Msg.Message=WM_KEYDOWN)and(Msg.wParam=VK_CONTRol+VK_HOME)then     begin end;

解决方法 要检查VK_CONTRol虚拟键的状态,必须使用 GetKeyState功能.

试试这个样本

procedure TSell.ApplicationEvents1Message(var Msg: tagMSG;  var Handled: Boolean);begin  if (Msg.Message=WM_KEYDOWN) then   if  (GetKeyState(VK_CONTRol) < 0) and (Msg.wParam=VK_HOME) then    //do your stuffend;

总结

以上是内存溢出为你收集整理的delphi – 为什么VK_Control VKHome不能为我工作？全部内容，希望文章能够帮你解决delphi – 为什么VK_Control VKHome不能为我工作？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。