实例——使用deletetable方法删除paradox数据库的人员表.txt

冒泡排序延时请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。系统会自动删除debug和release目录

procedure TForm1. Delet_Table_BtnClick(Sender: TObject)；
begin
with RenYuan do
begin
  Active := False；
  //为了删除除表，表必须处于关闭状态
  DatabaseName := 'DBDEMOS'；
  TableName := 'RenYuan'；
  //删除人员表'RenYuan'
  TableType := ttParadox；
  DeleteTable；
  //调用Ttable组件的DeleteTable方法，从Paradox数据库中删除'RenYuan'表
End；
End；