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;

相关阅读 >>

firemonkey 做 app 的界面设计方法研究

Delphi xe6开发的android应用实现在线升级完成后自动安装apk代码(加说明)

Delphi idftp 详解

Delphi中exit,abort,break,continue,halt,runerro 的区别

Delphi idhttp批量上传图片

Delphi deletedirectory 删除目录下所有文件包括子文件夹下所有文件

Delphi 调用ie隐藏的命令

Delphi用ado操作数据库完整示例

Delphi判断文件夹(目录)是否存在,不存在就创建一个

Delphi windows 编程[15] - 菜单消息: wm_command

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



打赏

取消

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

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

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

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

评论

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