Delphi では、次のようにファイルをロックできることがわかりました。
aHandle := CreateFile(PChar(aFileName),GENERIC_READ, 0, nil, OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0); // get the handle of the file
aFileSize := GetFileSize(aHandle,nil); //get the file size for use in the lockfile function
Win32Check(LockFile(aHandle,0,0,aFileSize,0)); //lock the file
しかし、それまでアプリを実行せずに、次の再起動までファイルをロックしたままにする方法はありますか?