操作文件的时候,可以独占。写入注册表时,可以用lock方法,但总是不算太好的
一个方法,不知道你为什么要锁定注册表呢?
一个方法,不知道你为什么要锁定注册表呢?
解决方案 »
- 一个异常的困惑。。。蛋疼好多天了
- valuelisteditor 如何实现改变行的颜色
- 连接数据库奇怪问题
- ASTA作三层如何更新服务器上的数据呢?
- 为什么我的D7装QuickRep3.62 for d7,会有很多错误
- 请问:将Tcombobox的style属性设为csDropDownList后,就不能再赋值了,为什么?
- 关于dbgrid打印的新问题(我已经搜索了,没有解决),解决就给分
- DSPack开发vod应用,怎样静音与声首切换?
- 在Delphi6中Adoquery连接Access数据库的一个问题
- Delphi5.0连接ACCESE 2000能行吗?望各位不吝赐教!
- 17岁需要什么??
- 在DELPHI中关于网络方面问题?
to GWFXP(影): 考虑到冲突,需要这样作,请问如何操作文件时独占,写注册表时有lock方法吗?
procedure OpenForShare(const FileName: String);
var
FileHandle : Integer;
begin
FileHandle := FileOpen(FileName,mShareExclusive);
if FileHandle > 0 then
{valid file handle}
else
{Open error: FileHandle = negative DOS error code}
end;