Delphi 过滤字符串特殊符号的函数

本文整理自网络，侵删。

 
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 正则判断是否包含数字

Delphi计算两个时间差

Delphi 正则表达式tperlregex 类的属性与方法

Delphi winapi: getdesktopwindow - 返回桌面窗口的句柄

Delphi 内存分配 stralloc

Delphi tdirectory.tfilterpredicate

Delphi 网站后台扫描例子

Delphi 实现批量文件名修改

Delphi 2009 新增单元 character[1]: toupper、tolower - 字符与字符串的大小写转换

Delphi 如何识别应用程序没有响应

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

转载请注明出处：木庄网络博客 » Delphi 过滤字符串特殊符号的函数