如何更改数据表中的某项记录(50分)

代码如下,请高手赐教
begin
cc1:=edit1.Text;
cc2:=edit2.Text;
cc3:=edit3.Text;

table1.First;
table1.edit;
if cc1=table1.FieldByName('id').asString then
if cc2=cc3 then
table1.Fields[1].Clear and
table1.Fields[1]:=cc2
table1.Post
else showmessage('请重新确认')
else showmessage('无此用户');


end;

你的错误很多，我按你的代码从写了一边，你应该看的明白[]
begin
cc1:=edit1.Text;
cc2:=edit2.Text;
cc3:=edit3.Text;
table1.First;
if cc1=table1.FieldByName('id').asString then
begin
if cc2=cc3 then
begin
table1.edit;
table1.Fields[1].asstring:=cc2
table1.Post;
end
else showmessage('请重新确认')
end
else showmessage('无此用户');
end;

if Table1.Locate('ID',cc1,[]) then
begin
if cc2=cc3 then
begin
Table1.Edit;
Table1.Fields[1].AsString:=cc2;//最好用FieldByName
Table1.Post;
end
else
showmessage('请重新确认')
end
else
showmessage('无此用户');

如果是改变所有的记录是某些数据，
就做一个循环。
begin
cc1:=edit1.Text;
cc2:=edit2.Text;
cc3:=edit3.Text;
begin
table1.First;
if cc1=table1.FieldByName('id').asString then
begin
if cc2=cc3 then
begin
table1.edit;
table1.Fields[1].asstring:=cc2
table1.Post
end
else showmessage('请重新确认')
end
Table1.next;
end;
else showmessage('无此用户');
end;