码迷,mamicode.com
首页 > Windows程序 > 详细

Delphi Edit输入+号(加号),不允许显示输入符号,清空Edit,显示事件

时间:2015-12-12 17:06:51      阅读:233      评论:0      收藏:0      [点我收藏+]

标签:

procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key=‘+‘ then
  begin
    form2.ShowModal;
    key:=#0;   //关键此步骤
  end;
end;

Delphi Edit输入+号(加号),不允许显示输入符号,清空Edit,显示事件

标签:

原文地址:http://www.cnblogs.com/lantianhf/p/5041428.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!