向memo发送一个ctr+回车消息(50分)

  • 主题发起人 主题发起人 YiOnLine
  • 开始时间 开始时间
Y

YiOnLine

Unregistered / Unconfirmed
GUEST, unregistred user!
button 的click向memo发送<br>&quot;ctr+回车&quot;消息,<br><br>怎样在onclick事件中写sendmessage啊?
 
回车符在WINDOWS中是#13#10<br>CTR不记得了,可以查查资料,很多编辑软件都有这些符号的查询的
 
你只要把MEMO的回车屏蔽了,就可以了。
 
#13是回车,#10是换行.在memo的ONKEYPERSS中输入&quot;ctr+回车&quot;的ASCII码就行了.给点分吧!
 
各位,其实主要是怎发送这个消息
 
he WM_KEYDOWN message is posted to the window with the keyboard focus when a nonsystem key is pressed. A nonsystem key is a key that is pressed when the ALT key is not pressed. <br><br>WM_KEYDOWN &nbsp;<br>nVirtKey = (int) wParam; &nbsp; &nbsp;// virtual-key code <br>lKeyData = lParam; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;// key data <br> <br><br>Parameters<br><br>nVirtKey<br><br>Value of wParam. Specifies the virtual-key code of the nonsystem key. <br><br>lKeyData<br><br>Value of lParam. Specifies the repeat count, scan code, extended-key flag, context code, previous key-state flag, and transition-state flag, as shown in the following table: <br><br>Value Description<br>0-15 Specifies the repeat count. The value is the number of times the keystroke is repeated as a result of the user holding down the key.<br>16-23 Specifies the scan code. The value depends on the original equipment manufacturer (OEM).<br>24 Specifies whether the key is an extended key, such as the right-hand ALT and CTRL keys that appear on an enhanced 101- or 102-key keyboard. The value is 1 if it is an extended key; otherwise, it is 0.<br>25-28 Reserved; do not use.<br>29 Specifies the context code. The value is always 0 for a WM_KEYDOWN message.<br>30 Specifies the previous key state. The value is 1 if the key is down before the message is sent, or it is 0 if the key is up.<br>31 Specifies the transition state. The value is always 0 for a WM_KEYDOWN message.<br> <br><br>Return Values<br><br>An application should return zero if it processes this message.
 
你从Delphi5的安装盘里找一到Sendkeys这个单元<br>很简单的就可以实现你的效果~
 
keybd_event(VK_Control, MapVirtualKey(VK_Control, 0), 0, 0);<br> &nbsp;keybd_event(VK_RETURN, MapVirtualKey(VK_RETURN, 0), 0, 0);<br> &nbsp;keybd_event(VK_RETURN, MapVirtualKey(VK_RETURN, 0), KEYEVENTF_KEYUP, 0);<br> &nbsp;keybd_event(VK_Control, MapVirtualKey(VK_Control, 0), KEYEVENTF_KEYUP, 0);<br><br>哈,这个可以,<br>谢谢各位
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部