【delphi】正则判断windows完整合法文件名,包括路径

embedded/2024/9/24 3:28:02/

Delphi 中,可以使用正则表达式来检查 Windows 文件名称或路径是否合法。合法的文件名和路径要求符合以下几点:

  1. 禁止的字符:文件名和路径不能包含以下字符:<, >, :, ", /, \, |, ?, *
  2. 文件名不能以空格或点结束
  3. 长度限制:文件名最长为 255 个字符,路径最长为 260 个字符。

要更严格地检查 Windows 文件路径的合法性,除了排除不允许的字符外,还需要加入对以下情况的检测:

  1. 连续两个反斜杠(\) 在路径中是不合法的。
  2. 合法的盘符:路径应该以合法的盘符开头(如 C:\ 等),或者是以网络路径 \\ 开头。
  3. 路径中的每个文件夹名也应合法:即每个文件夹名不能包含非法字符、不能以空格或点结束。

为了实现以上点,可以利用正则表达式并添加一些额外的逻辑处理。以下是解决方案。

  • 首先检查路径长度是否符合要求(文件名最长 255 字符,路径最长 260 字符)。
  • 然后使用正则表达式来匹配文件名,确保不含非法字符并且文件名的最后一个字符不能是空格或点。

Delphi 代码示例:

usesSystem.RegularExpressions, System.SysUtils;function IsValidFileNameOrPath(const AFileName: string): Boolean;
varRegex: TRegEx;DrivePattern, NetworkPattern, PathPattern: string;
begin// 检查文件路径是否为空,是否超过260字符限制if (AFileName = '') or (Length(AFileName) > 260) thenExit(False);// 合法盘符模式,例如 C:\ 或 D:\DrivePattern := '^[a-zA-Z]:\\';// 网络路径模式,例如 \\server\shareNetworkPattern := '^\\\\[^<>:"/\\|?*]+\\[^<>:"/\\|?*]+';// 文件名和路径的基本合法性检查,排除非法字符和不合法的结尾// 该模式允许文件夹和文件名不包含非法字符,文件名或文件夹不能以空格或点结束PathPattern := '^(?!.*[\\/]{2,})[^<>:"/\\|?*]+[^ .]$';// 检查是否符合盘符路径或者网络路径的格式if TRegEx.IsMatch(AFileName, DrivePattern) or TRegEx.IsMatch(AFileName, NetworkPattern) thenbegin// 去掉盘符或者网络前缀,剩下的部分检查合法性Regex := TRegEx.Create(PathPattern, [roIgnoreCase]);// 按照目录分割,依次检查每一个路径片段是否合法Result := True;var Parts := AFileName.Split(['\']);for var Part in Parts dobeginif not Regex.IsMatch(Part) thenbeginResult := False;Break;end;end;endelseResult := False;
end;procedure TestFileNameValidation;
varTestFileName: string;
beginTestFileName := 'C:\Program Files\MyApp\data.txt'; // 示例路径if IsValidFileNameOrPath(TestFileName) thenWriteln('文件路径合法')elseWriteln('文件路径不合法');
end;beginTestFileNameValidation;
end.

验证逻辑:

  1. 盘符检查:通过正则表达式 ^[a-zA-Z]:\\ 来验证是否以合法的盘符开头(如 C:\D:\)。
  2. 网络路径检查:通过正则表达式 ^\\\\[^<>:"/\\|?*]+\\[^<>:"/\\|?*]+ 来验证网络路径是否合法(如 \\Server\Share)。
  3. 路径片段检查:将整个路径按照 \ 拆分为多个部分,逐个检查每个部分(文件夹和文件名)的合法性。使用正则表达式 ^(?!.*[\\/]{2,})[^<>:"/\\|?*]+[^ .]$ 来确保:
    • 不能包含非法字符。
    • 不允许连续的反斜杠(\\)。
    • 不能以空格或点结束。

解释:

  • 盘符和网络路径正则表达式

    • ^[a-zA-Z]:\\:用于检查以合法盘符开头的路径。
    • ^\\\\[^<>:"/\\|?*]+\\[^<>:"/\\|?*]+:用于检查网络路径,确保合法的服务器和共享文件夹名称。
  • 路径合法性正则表达式

    • ^(?!.*[\\/]{2,}):负向先行断言,确保没有连续的反斜杠或正斜杠。
    • [^<>:"/\\|?*]+[^ .]$:确保文件夹和文件名不包含非法字符,且不能以空格或点结尾。

测试用例:

procedure TestFileNameValidation;
beginWriteln(IsValidFileNameOrPath('C:\valid\path\file.txt'));  // 合法Writeln(IsValidFileNameOrPath('C:\invalid\\path\file.txt'));  // 不合法 - 连续的反斜杠Writeln(IsValidFileNameOrPath('C:\invalid|path\file.txt'));  // 不合法 - 包含非法字符 '|'Writeln(IsValidFileNameOrPath('\\server\share\file.txt'));   // 合法 - 网络路径Writeln(IsValidFileNameOrPath('\\server\\invalid\file.txt'));  // 不合法 - 连续的反斜杠Writeln(IsValidFileNameOrPath('C:\invalidpath\file.'));  // 不合法 - 文件名以点结尾
end;

总结:

这段代码通过严格的正则表达式和逻辑检查文件名和路径的合法性。它确保了路径中的每个片段都不会有非法字符、连续的反斜杠,并且合法的文件名不会以空格或点结尾。如果你想进一步增加其他规则(如长度、特殊情况),可以在此基础上进行扩展。


http://www.ppmy.cn/embedded/115877.html

相关文章

【C++】list详解及模拟实现

目录 1. list介绍 2. list使用 2.1 修改相关 2.2 遍历 2.3 构造 2.4 迭代器 2.5 容量相关 2.6 元素访问 2.7 操作相关 3. 模拟实现 3.1 节点类 3.1.1 初始结构 3.1.2 节点的构造函数 3.2 迭代器类 3.2.1 初始结构 3.2.2 迭代器 3.2.3 迭代器-- 3.2.4 解引…

vue 案例使用

el-switch 按键的使用 <el-switchclass"switchStyle" v-model"boolValue" :active-value"1" :inactive-value"0" active-text"ON" inactive-text"OFF" active-color"#13ce66" inactive-color&qu…

基于等保2.0标准——区块链安全扩展要求探讨

在数字经济时代&#xff0c;区块链作为新技术&#xff0c;能够推进经济社会规则体系重构&#xff0c;在经济金融、司法审判、食品追溯、商业贸易、公共信用等领域已有广泛应用。但在规划、建设、运维区块链的同时&#xff0c;也需要全面评估与防范区块链应用带来的安全隐患。 …

C语言编译四大阶段

目录 一、引言 二、预处理阶段 三、编译阶段 四、汇编阶段 五、链接阶段 六、总结 本文将详细介绍C语言编译的四个阶段&#xff0c;包括预处理、编译、汇编和链接。通过学习这些阶段&#xff0c;读者可以更好地理解C语言程序的编译过程&#xff0c;提高编程效率。 一、引…

【AI创作组】MATLAB基础语法总结

MATLAB基础语法介绍 1. MATLAB数据类型 MATLAB是一种高性能的数学计算语言,提供了丰富的数据类型和变量定义规则,使得用户可以灵活地进行数学计算和数据操作。了解和掌握这些基础知识对于高效使用MATLAB至关重要。 以下是MATLAB中常见的数据类型: 1.1 数值类型 数值类型…

计算机网络各层有哪些协议?

计算机网络的各层协议知识总结 一、物理层 没有涉及到比较重要的协议&#xff0c;但是有一个比较重要的技术----非对称数字用户线&#xff08;ADSL&#xff09; 二、数据链路层 1、点对点协议&#xff08;PPP----point to point protocol&#xff0c;用户计算机与ISP进行通信…

浮动静态路由

浮动静态路由 首先我们知道静态路由的默认优先级是60&#xff0c;然后手动添加一条静态路由优先级为80的路由作为备份路由。当主路由失效的备份路由就会启动。 一、拓扑图 二、基本配置 1.R1: <Huawei>system-view [Huawei]sysname R1 [R1]interface GigabitEthernet…

《独孤九剑》游戏源码(客户端+服务端+数据库+游戏全套源码)大小2.38G

《独孤九剑》游戏源码&#xff08;客户端服务端数据库游戏全套源码&#xff09;大小2.38G ​ 下载地址&#xff1a; 通过网盘分享的文件&#xff1a;【源码】《独孤九剑》游戏源码&#xff08;客户端服务端数据库游戏全套源码&#xff09;大小2.38G 链接: https://pan.baidu.co…