delphi与vfp(50分)

  • 主题发起人 主题发起人 刀月
  • 开始时间 开始时间

刀月

Unregistered / Unconfirmed
GUEST, unregistred user!
我试着用delphi和 vfp编了个数据库方面的小程序
可是在删除纪录时总是不能彻底的删除,
那位高手能帮小弟一把,拜托拜托.[:)]
 
来自:tom12345, 时间:2001-7-28 16:23:00, ID:591817
首先,在uses中加入 DbiTypes,DbiProcs,DbiErrs;

将最后删除的记录恢复:

DbiSetProp(hDBIObj(table1.handle), curSOFTDELETEON,1);
table1.first;
for i:=1 to Table1.RecordCount do
begin
table1.UpdateCursorPos;
DbiUndeleteRecord(table1.handle);
table1.next;
end;
table1.first;
DbiSetProp(hDBIObj(table1.handle), curSOFTDELETEON,0);

彻底删除记录:

Table1.Exclusive:=True;
DbiPackTable(table1.dbHandle, table1.handle, NIL, NIL, true);
 
哪个是 VFP 的?
 
你的问题对VFP来说是初级问题:
答案:
USE TABLE1 EXCLUSIVE && 必须独占打开
PACK && 将已经打上删除标记的记录彻底地清除掉!
 
to:qingzhong
我的问题是怎么用delphi语句彻底的删除他
谢谢再考虑一下
 

Similar threads

后退
顶部