Question

在 DBGrid 中修改、删除、更新数据

delphi 7.0 使用 ADOQuery DataBase DBGrid
button1 button2 button3 button4
caption 修改 删除 更新 取消

数据库连接正常，DBGrid可以显示数据库内的数据。
求教：1、直接在DBGrid中修改数据，然后单击button1.完成数据的修改。
2、在DBGrid中单击选中一条记录，然后单击button2，在数据库中删除此条记录。
3、单击button3，DBGrid中显示数据库中最新的数据。
4、单击button4，取消对数据库的更改。
数据库名为：shujuku 表名为：biao
表内字段：no name

Answer 1

看得出来，数据库已经连接好了。那就是说，数据库在本地。对吧？
既然会连接数据库，那就说明你应该知道DBNavigator1。
既然你没有选择DBNavigator1，那肯定是有原因的。
其实，使用button一样可以实现DBNavigator1的功能。
1、增加记录的命令：
table1.addend。 在table尾部添加一条记录；
table.insert。 在当前记录的前面插入一条记录；
2、修改记录的命令：
table1.edit 编辑当前记录
3、删除记录的命令：
table1.delete
4、撤销的命令：
table1.cancel
5、提交命令
table1.post
对数据库的所有曾、删、改的命令后都要进行提交！

Answer 2

var
Form1: TForm1;
sno:string;

implementation

{$R *.DFM}

procedure TForm1.Button3Click(Sender: TObject);
begin
//更新
with ADOQuery1 do
begin
close;
sql.clear;
sql.add('select * from biao');
open;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
//删除
with ADOQuery1 do
begin
close;
sql.clear;
sql.add('delete biao where no='''+sno+'''');
ExecSQL;
close;
end;
Button3Click(nil);
end;

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin

sno:=ADOQuery1.fieldbyname('no').asstring;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
//修改
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
//取消
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
//连接
try
ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=shujuku;Data Source=服务器名或ip地址';
ADOConnection1.connected:=true;
except
showmessage('数据库连接失败');
end;
end;

end.

修改及取消不太好做