在RichEdit控件中使用ctrl+enter快捷键的问题

2008-08-26 11:05:07 202 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

VS2010工程实战指南：老IDE在工控与嵌入式场景的核心价值 Visual Studio 2010并非过时工具，而是面向.NET Framework 4.0、Windows XP/Server 2003及嵌入式工控环境的关键开发平台。其基于MEF的稳定架构、原生混合模式调试、物理路径依赖管理与多维配置系统，共同支撑高确定性交付。在第三方SDK绑定、运行时兼容性约束（如msvcr100.dll）、强名称验证与行业合规（IEC 62304）等现实条件下，VS2010展现出远超新版本的工程鲁棒性。本文聚焦IntelliSense降级机制、dump文件内存分析、Setup P 阅读详情

我想在RichEdit控件中使用ctrl+enter快捷键,但当按下组合键ctrl+enter时,
回车键起作用了,每按一次组合键,就会插入一个换行.按组合键的时候,也不会
出发OnKeyPress事件,不能通过key:=#0来屏蔽回车键.要怎么做才能实现在按
组合键ctrl+enter时,richedit不接受enter键产生的换行?

procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin

if (key=vk_return) and (ssCtrl in shift) then
begin
showmessage('KeyDown');
end;

end;

procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
begin
showmessage('KeyPress');
end;
end;

...全文