关于MS-SOL　SQL Server的加锁问题

我用Delphi做了一个程序后台数据库是MS SQL Server 2000 其中用了一个存储过程，该存储过程用时比较长大概有半分钟吧（客户要求的最大值）在这期间我对数据表价了锁，不想让第二个人操作该表，请问我如何能用delphi获取该信息，告诉用户该时间段禁止对数据表操作？