RSS订阅 | 匿名投稿
您的位置:网站首页 > 函数 > 正文

delphi ValidateName 过滤特殊字符

作者:admin 来源: 日期:2018/1/29 17:59:34 人气: 标签:

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;

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料