怎样用DbiDoRestructure(上次我说成DbiPackTable,错了)函数来整理Paradox数据库?

风子 2000-03-01 11:41:00
加精
怎样用DbiDoRestructure函数来整理Paradox数据库?我按照在线帮助的实例来处理,但还不能实现,总是出现“BDE Ingine Not Initialize”。哪位高手能给我一个实例程序,谢谢?
...全文
97 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
AcherMagic 2000-03-02
  • 打赏
  • 举报
回复
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DBIResult rslt;
CRTblDesc TblDesc;
hDBIDb hDb;

Table1->Exclusive = TRUE;
Table1->Open() ;
hDb=Table1->DBHandle ;
memset((void *) &TblDesc, 0, sizeof(CRTblDesc));
lstrcpy(TblDesc.szTblName,"employee.db");
lstrcpy(TblDesc.szTblType, szPARADOX);
TblDesc.bPack = TRUE;
Table1->Close();
rslt = DbiDoRestructure(hDb, 1, &TblDesc, NULL, NULL,NULL, FALSE);
if (rslt == DBIERR_NONE)
ShowMessage("Successful Pack");
Table1->Exclusive = FALSE;
}

1,178

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder 数据库及相关技术
社区管理员
  • 数据库及相关技术社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧