方法可以有两种:
一,
SET EXCEULSIVE ON
LOCATE FOR 记录="???"
DELETE
USE 表名.DBF EXCEULSIVE
PACK
SET EXCEULSIVE OFF
方法二,
USE 表名.DBF EXCEULSIVE
LOCATE FOR 记录="???"
DELETE
PACK
USE 表名.DBFSHARE
谢谢楼上老师们的赐教,我用了下面程序真的实现了物理上的删除
NODEFAULT
SET DELETE ON
USE 密码表EXCLUSIVE
LOCATE FOR 帐户=thisform.txt帐户.value
DELETE
PACK
USE 密码表 SHARE
但是运行了之后,那个表单就一片空白了,下次进去的话就好了,请问咋解决这个问题?