webdav.GetActiveLocks('http://localhost/WebDAV/');   
Assert(webdav.ActiveLocks.Count = 0);   
Assert(webdav.CurrentLockToken = '');   
webdav.LockOwner := 'Clever Tester';   
webdav.LockScope := wsExclusive;   
Assert(webdav.LockTimeOut <> '');   
lockToken := webdav.Lock('http://localhost/WebDAV/1.txt');   
 
webdav.GetActiveLocks('http://localhost/WebDAV/');   
Assert(webdav.ActiveLocks.Count > 0); 

Article ID: 47, Created On: 1/23/2010, Modified: 1/23/2010