delphi ValidateName 过滤特殊字符


本文整理自网络,侵删。

 
function ValidateName(n: string): string;
var banned, res: string; i,j: integer;
begin
  res:= n;
  banned:= '\/:*?"<>|';
  for i:= 1 to Length(res) do
    for j:= 1 to Length(banned) do
      if res[i]=banned[j] then res[i]:=' ';
  Result:= res;
end;

相关阅读 >>

Delphi datasnap http用法注意事项

Delphi重写一个字符串分割函数

Delphi实现全局鼠标钩子

Delphi setpriorityclass 设置当前程序的优先级

Delphi 设置系统静音取消系统静音

Delphi xe 获取硬盘id序列号

Delphi高效的byte转化sring 函数

Delphi datetimetostr函数专用优化版

Delphi xe 关闭android应用

Delphi 如何将颜色值转换为灰度颜色值?

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...