谢谢你!我试了你的办法,adocommand1连接到数据源,然后在其text属性里面写入pack xx.dbf,然后引用一个command按钮来触发,代码写入你说的‘adocommand1.Execute;’。可不知道是怎么了,程序报错。project.exe raised exception class EAccessViolation with message 'Access violation at address 04D01B8D in module 'vfpodbc.dll'.能否帮我,不胜感激!
adocommand1.CommandText:='pack ht.dbf';
adocommand1.Execute;