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中使用汇编(关于pos函数的问题)

Delphi模拟文件拖拽

Delphi远程开机再配合远程控制

Delphi winsock api写的邮件发送单元

Delphi改变文件夹图标

crc16.pas

Delphi windows 获取指定进程句柄数

图解qq群如何快速找到自己想要的Delphi资源

Delphi nativexml的中文支持

Delphi 打开android应用信息

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

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