本文整理自网络,侵删。
delphi中判断某个文件是否已经打开
if FileExists(FileName) then
if (FileOpen(FileName, fmShareExclusive) < 0) then
ShowMessage('文件已打开');
相关阅读 >>
Delphi xe5 for android 地理定位gps
Delphi 如何在程序中动态设置墙纸(使用iactivedesktop接口)
Delphi xe7 android通过配置实现splash功能
更多相关阅读请进入《Delphi》频道 >>