很简单的问题(50分)

1。在一个按钮里添加删除当前grid字段的数据和删除同数据库里的表，
在一个按钮里添加增加一个数据，以上都不用nav,怎么写。
2。当edit 中的文字和一个表如flk的一个字段如bh里的一个数据相同时就删除那条数据。
应该怎么写？
当edit中的文字和一个表名相同时就删除该表，又该怎么写呢？

1。table1.delete 就是了，不会这么简单吧，好像没讲清楚呀
2。var s:string;
s:=edit1.text;
table1.indexfieldnames:='hb';
if table1.findkey() then table1.delete;
不会吧！这么简单，请把问题讲清楚

Pelase read help about Deletetable, Append, post..

1。在一个按钮里添加删除当前grid字段的数据和删除同数据库里的表，
在一个按钮里添加增加一个数据，以上都不用nav,怎么写。
2。当edit 中的文字和一个表如flk的一个字段如bh里的一个数据相同时就删除那条数据。
应该怎么写？
当edit中的文字和一个表名相同时就删除该表，又该怎么写呢？

配合sql做吧
1、设数据集为AdoTable1，删除当前记录 AdoTable1.delete;
删除表：
Adoquery1.close;
Adoquery1.sql.clear;
Adoquery1.sql.add('drop table flk ');
Adoquery1.execsql;

2、删除记录：
Adoquery1.close;
Adoquery1.sql.clear;
Adoquery1.sql.add('delete from flk ');
Adoquery1.sql.add('where bh=bh ');//pbh是参数变量
Adoquery1.Paramters.ParamValue['pbh']:=edit1.text;
Adoquery1.execsql;
删除表：
Adoquery1.close;
Adoquery1.sql.clear;
Adoquery1.sql.add('drop table flk ');//pflk是参数变量
Adoquery1.Paramters.ParamValue['pflk']:=edit1.text;
Adoquery1.execsql;

同意萧月禾的看法，不知道有没有分，嘿！来晚了，这种简单问题本来就少。

可是我只用了ado的dataset和connection控件

我想删除数据库中的一个表所以这样写
procedure TForm1.Button2Click(Sender: TObject);
var
strsql:string;
stablename:string;
begin
adodataset1.delete;
stablename:=dbedit1.text;
strsql:='DROP TABLE '+stablename+'';
adoconnection1.execute(strsql);
end;
为何这样写说找不到约束条件。

多人接受答案了。