📄 12.htm
字号:
<html><!-- #BeginTemplate "/Templates/text.dwt" --><head><title>Untitled Document</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><style type="text/css"><!--.title11 { font-family: "黑体"; font-size: 11pt; color: #339900; font-weight: bold}.text11 { font-family: "宋体"; font-size: 11pt; color: #009933; font-weight: normal}--></style></head><body bgcolor="#FFFFFF" background="../q1.jpg"><span class="text11"></span> <table width="91%" border="0" height="371" class="title11"> <tr class="title11" align="center"> <td height="26" class="title11"><!-- #BeginEditable "title" -->模拟按下某键 <!-- #EndEditable --></td> </tr> <tr class="text11" align="left" valign="top"> <td class="text11"><!-- #BeginEditable "text" -->让 WIN95 模拟按了一个按键,就向某窗体发送按键一样,例如按下 ENTER 或者 TAB 键,或者按 7 键<br> PostMessage(Object.Handle, WM_KEYDOWN, VK_TAB, 0);<br> {Object表示窗体名,WM_KEYDOWN是按下,VK_TAB是发送的按键}<br> PostMessage(edit1.Handle, WM_KEYDOWN, 55, 0);<br> {向edit1发送一个7字} <!-- #EndEditable --></td> </tr></table><table width="91%" border="0"> <tr class="title11" align="right"> <td><a href="delphi.html"><font color="#66FF00">回到标题列表</font></a></td> </tr></table></body><!-- #EndTemplate --></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -