判断.txt文档被打开或被其它程序占用(50)

TXT是非独占方式运行，在打开情况下都能被修改，删除，复制。。。上网找了好多，也没找到合适的方法。请求各位能给个有效的方法来判断TXT是否正在打开或被调用。参考代码是：function TFileOperation.FileIsRun(fileName: string): Boolean;var hFile:THandle;begin Result:=false; if not FileExists(FileName) then Result := False; hFile:=CreateFile(PChar(FileName), GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0); Result:=(hFile=INVALID_HANDLE_VALUE); if not Result then CloseHandle(hFile);end;上面的方法也对TXT不适用。

判断 notepad.exe 是否在运行至于被调用。。。等待高手

要是打开多个TXT，那不是也不好判断打开的是不是我要覆盖的文档啊。不过你给了我启发，如果按窗体标题，用API　FINDWINDOW查找窗体句柄，然后再判断，应该可以吧！先试试看。

解决了，哈哈。谢谢啦