Delphi Memo中禁止汉字

最新推荐文章于 2020-12-28 13:22:47 发布
最新推荐文章于 2020-12-28 13:22:47 发布
阅读量1.8k 收藏
点赞数
CC 4.0 BY-SA版权
原文链接：http://www.cnblogs.com/rogee/archive/2010/09/20/1832023.html
本文介绍如何在Delphi中使用Memo控件时，通过在OnKeyPress事件中加入特定代码来禁用输入ASCII值大于127的特殊字符。此方法确保了Memo控件只接受常规字符输入，避免了不必要的输入错误。

在memo里面的OnKeyPress里面加入


if Key>#127 then   Key:= #0;

即可！！！

转载于:https://www.cnblogs.com/rogee/archive/2010/09/20/1832023.html

Delphi使用TMS.MQTT开发Mqtt客户端
zxm8513优快云博客
06-02 991
找到安装目录：mosquitto.conf，打开后修改 allow_anonymous false（禁止匿名登录），password_file D:\Program Files\mosquitto\pwfile.example（密码存放位置）csConnectionRejected_ConnectionRateExceeded：连接被拒绝，连接速率超过限制。csConnectionRejected_UnspecifiedError：连接被拒绝，未指定的错误。
delphi控件使用
achs24540的博客
10-27 2736
Standard页 1- Tlistbox控件 重要属性items.* 举例，界面设计如下左，执行结果如下右： 代码为 procedure TForm1.Button1Click(Sender: TObject); begin edit1.Text := listbox1.Items.CommaText; edit2.Text := listbo...
Delphi 学习日记：禁止TEdit或TMemo的“Ctrl+V”粘贴
mmdev
03-23 692
No "Paste" for you! To intercept any key combination for a TEdit (or TMemo or more generally TCustomEdit) you need to handle the OnKeyDown event. Put a TEdit named "Edit1" on a form (named "Fo...
在 WinForm中屏蔽中文输入法
http://www.softwareace.cn 王牌软件
07-24 641
在WinForm的开发中，有时有些特殊的要求。例如：在某个Form上彻底屏蔽中文输入法，使之不能切换到中文输入，不能进行中文输入。　　这个问题看上去简单，实现起来并没有想象中的简单。下面，把我做的几个实验依次列举，就会发现，其实实现起来还是有一定难度的。　　实验一：　　1、新建项
Delphi TMemo 可以显示、编辑多行文本
weixin_30414305的博客
08-05 1054
多行编辑框组件（TMemo）TMemo组件可以显示、编辑多行文本，是一个标准的Windows多行编辑组件。对一些比较多的文本内容可以利用TMemo组件来显示、编辑。1．TMemo组件的典型用法TMemo组件主要用于输入备注型的字符串，它不能进行文字格式的设置。利用TMemo组件Lines属性的LoadFromFile方法打开文本文件，对文本文件进行编辑。编辑完成后再利用Lines属性的SaveTo...
Delphi字符串中添加特殊字符及ASCII码表
高筑墙，广积粮，缓称王
10-27 6373
本文转自：Delphi字符串中添加特殊字符及ASCII码表Delphi字符串中有时需要用到一些特殊字符，比如“换行”“TAB”“退格”等，这时，可以用井号“#”+字符的10进制ASCII码方式实现。如“#9”代表“TAB”，“#8”代表退格等。ASCII码中，第0～32号及第127号是控制字符，常用的有LF(换行)、CR(回车)；第33～126号是字符，其中第48～57号为0～9十个阿拉伯数字；65
delphi 开发经验技巧宝典源码
08-12
0034　在Delphi中禁止使用result　24 0035　如何在Delphi中录制代码　24 0036　如何编译器会提示数组太大时的处理技巧　25 0037　如何对超大数字进行计算　25 0038　强类型的定义及使用　25 2.2　类、函数、重载　25...
dbgrid使用大全(delphi)
热门推荐
beyondqd的专栏
08-25 1万+
<br /> <!-- /* Font Definitions */ @font-face {font-family:宋体; panose-1:2 1 6 0 3 1 1 1 1 1; mso-font-alt:SimSun; mso-font-charset:134; mso-generic-font-family:auto; mso-font-pitch:variable; mso-font-signature:3 135135232 16 0 262145 0;}
delphi 屏蔽中文输入法
xiuzhentianting的博客
09-06 2375
#include #pragma comment(lib, "imm32.lib") HIMC hImc = ::ImmGetContext( m_hWnd); 屏蔽输入法 ::ImmAssociateContext(m_hWnd , NULL); ::ImmReleaseContext(m_hWnd , hImc ); 恢复输入法的代码。 ::ImmAssoc
在Delphi中编程实现中文输入的功能
zyj66666的博客
07-10 1917
BorlandDelphi是著名的Borland（现在已和Inprise合并）公司开发的可视化软件开发工具。Delphi被称为第四代编程语言，它具有简单、高效、功能强大的特点，它一直为广大程序设计员所青睐。 　　一、背景介绍 　　大家在使用计算机操作的时候，一般情况下输入中文似乎就是一件不可避免的事情了。不同的使用者可能就喜欢不一样的中文输入法(即inputmethodeditor,简
Delphi 加载Txt文件中的内容显示在Memo中文字的前面
xiongmao000738
02-16 5154
{*------------------------------------------------------------------------------ 显示日记的内容 @param Flag 是否显示当前文档的全 只输入 ------------------------------------------------------------------------
delphi memo 不允许复制_Delphi 复制动态数组
weixin_42116672的博客
12-28 334
Delphi 的动态数组使用很方便，支持自动管理内存，无需显式释放；其实质是指向连续内存的智能指针。既然是指针，直接赋值就会导致两个变量指向同一个数组，如果修改其中一个，另一个也会改变。例如：var a, b: array of Integer; begin SetLength(a, 2); a[0] := 1; a[1] := 2; // 此时 a 为 [1,2] b :...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值