本文整理自网络,侵删。
你伪码错误啦!
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 网上获取北京时间xmlhttprequest如何访问需要安全验证的网站
Delphi xe ioutils tpath(结构体) 的方法与属性
Delphi xe更改ttrayicon系统任务栏图标(无模糊)
更多相关阅读请进入《Delphi》频道 >>