>I would propose that IsRlocked() would be useless if it worked the other way
as
>it does not tell you anything about whtehr you can or cannot get a lock. Is
Rl
>ocked() (as you would have it work) could return .F. and the very next line o
f
>code could fail on a lock attempt (because someone else got the lock between
th
>e two lines of code). Ther is only one way to kow if you can get a lcok rega
rd
>less of what functions any language has in it, that is to GET THE LOCK, if yo
u
>can yo will and if you can't you won't.
Agree. As for function which could test for 'has anybody locked this
record, excluding myself', it could look like this
Func Lockable
Local lockable_ll
if rlock()
lockable_ll=.t.
unlock record recno()
else
lockable_ll=.f.
endif
return lockable_ll
If we wanted a function to know if anyone (including myself) has locked
the record, than it's iif(IsRlocked(), .t., not Lockable())
Therefore I think that Rlock() and IsRlocked() are quite sufficient to
know what we need to know of a record's lock status. AFAIK, Fox has
always had everything you need :)