摘要: class function TWmsApplicationfunction.IsFileInUse(FileName: TFileName): Boolean; var HFileRes: HFILE; begin Result := False; if not FileExists(FileName) then Exit; // 如果文件不存在,返回false ... 阅读全文
posted @ 2017-12-13 11:28 夏天的西瓜君 阅读(830) 评论(0) 推荐(0) 编辑