在Memo1的OnKeyPress中加以下代码:if Key=VK_INSERT then
begin
Memo1.SetFocus;
keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), 0 , 0 );
Memo2.SetFocus;
end;Memo2中也写相同代码其中keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), 0 , 0 );
是模拟键盘。
begin
Memo1.SetFocus;
keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), 0 , 0 );
Memo2.SetFocus;
end;Memo2中也写相同代码其中keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), 0 , 0 );
是模拟键盘。
解决方案 »
- 请问如何根据tg(A)得到A角度?
- 帮我做个同步专家这样的软件要多少钱啊! 有诚意的出个价, 制作人要在上海哦
- 各位大哥,我是新手,请问窗体如何相互调用?
- 怎样在ListView编辑标签时提示用户出错后重新进行编辑状态?
- 怎样把Ehlib24的TDBGridEh的抬头变中文?
- 如何将后台数据库的数据导入前台的临时数据库中?
- 软件如何同时支持SQL2000、SQl7.0?
- 找 Report Builder For D5 。 查了以前的贴子,给的地方都不能下了。
- 在BDE中如何实现数据库数据的分页显示!!
- Delphi的那个Delphi Direct...总让我很不放心,它会不会是木马程序呢?
- 为什么每次在添加记录以后会出现“Error creating cursor handle.”这是什么原因(SQL)?
- 如何将写入数据库的二进制文件读出???谢谢
改成 if Key=VK_INSERT then
begin
Memo2.SetFocus;
keybd_event(VK_Insert,MapVirtualKey(VK_INSERT,0),0,0);
Memo1.SetFocus;
end;后目的是达到了,可是光标乱闪,我再想想
用RICHEDIT试试
又学了一招