本文整理自网络,侵删。
function MyCreateDir(const Path: String): Boolean;begin // 建目录 if DirectoryExists(Path) then Result := True else Result := ForceDirectories(Path);end;
相关阅读 >>
Delphi 读文件到十六进制的函数(Delphi 7 下可用)
检查是否在Delphi xe7中启用或禁用了android蓝牙
Delphi 10 seattle android应用程序使用toast
更多相关阅读请进入《Delphi》频道 >>