delphi 屏蔽特殊字符

本文整理自网络，侵删。

 你伪码错误啦!
if Key in [#92,#47,#58,#42,#63,#34,#60,#62,#124] then
Key := #0;
不知道伪码也可以这样
if Key in ['\','/',':','*','?','"','<','>','|'] then
Key := #0;
查伪码可以用ord查,如showmessage(inttostr(ord('\'))) 

相关阅读 >>

Delphi integer.tryparse

Delphi twebbrowser打开paypal出错

Delphi 动态库里查询是否联接数据库

使用indy解决base64回车换行问题

Delphi 侧边栏隐藏窗体

Delphi获取网卡mac地址的两种方法

Delphi 用webbrowser给要访问的页面加上referer(来路)参数

Delphi高效的byte转化sring 函数

Delphi xe将图标和图像添加为资源

Delphi 读取png base64编码文件生成图片

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 屏蔽特殊字符