5
A
回答
6
試試這個在您的FORMCREATE:
procedure TForm1.FormCreate(Sender: TObject);
var
MyKeys: array of tagInput;
begin
setLength(MyKeys, 2);
MyKeys[0].Itype:=INPUT_KEYBOARD;
MyKeys[0].ki.wVk:=VK_CAPITAL;
MyKeys[0].ki.wScan:=0;
MyKeys[0].ki.dwFlags:=4;
MyKeys[0].ki.time:=0;
MyKeys[0].ki.dwExtraInfo:=0;
MyKeys[1].Itype:=INPUT_KEYBOARD;
MyKeys[1].ki.wVk:=VK_CAPITAL;
MyKeys[1].ki.wScan:=0;
MyKeys[1].ki.dwFlags:=4+2;
MyKeys[1].ki.time:=0;
MyKeys[1].ki.dwExtraInfo:=0;
SendInput(2, MyKeys[0], sizeof(tagInput));
end;
您可以在msdn
相關問題
- 1. 虛擬鍵盤
- 2. 安卓應用程序開始虛擬鍵盤打開
- 3. Android虛擬鍵盤KeyListener獲取虛擬鍵盤按鍵
- 4. 虛擬鍵盤wpf
- 5. 虛擬鍵盤javascript
- 6. Windows虛擬鍵盤
- 7. MooTools虛擬鍵盤?
- 8. 了虛擬鍵盤
- 9. javascript虛擬鍵盤
- 10. Jquery虛擬鍵盤
- 11. Javascript虛擬鍵盤
- 12. Flex:虛擬鍵盤
- 13. JavaFX虛擬鍵盤
- 14. 在PlayBook上開發虛擬鍵盤
- 15. 從Qt隱藏密鑰虛擬鍵盤
- 16. JavaScript中的虛擬鍵盤
- 17. 隱藏虛擬鍵盤
- 18. Lwuit禁用虛擬鍵盤
- 19. 製作虛擬鍵盤
- 20. 實現虛擬鍵盤PC
- 21. 使虛擬鍵盤消失
- 22. 動畫虛擬鍵盤
- 23. iPhone虛擬鍵盤錯誤
- 24. Qt虛擬鍵盤和QInputContextFactory
- 25. Unicode和jQuery虛擬鍵盤
- 26. ScrollPanel當DisclosurePanel +虛擬鍵盤
- 27. LWUIT 1.4:用虛擬鍵盤
- 28. Android虛擬鍵盤位置
- 29. 頂部的虛擬鍵盤
- 30. 虛擬鍵盤命令
該代碼獲取更多*印刷機*本大寫鎖定鍵。您可能想要添加另一個鍵盤事件來模擬密鑰的*版本*。 –
@Rob:對,謝謝。 – CloudyMarble
這不適合我。如果有問題,我正在使用XP家庭版。 –