这个简单的pack VFP数据表的程序怎么不好好运行？

[jjdelphi]

Query1和Table1都连到Temp.dbf
uses ...,DBIPROCS,DBIERRS; //这个地方对吗？
Button1.Click过程
Query1.Close;
Query1.SQL.Text:='delete from Temp.dbf';
Query1.ExecSQL;
Table1.Open;
DbiPackTable(Table1.DBHandle, Table1.Handle, nil, szDBASE, True);
执行时发现DBIPackTable执行错误：
The specified database handle or cursor handle is invalid or NULL
是什么原因？