请问高手在table中怎么能使某个字段的值都加上5？(5分)

请问高手在table中怎么能使某个字段的值都加上5？

update table1
set field1=field1+5

var qry:Tquery;
begin
qry:=Tquery.create(self);
qry.sql.add('update tablename set fieldname=fieldname+5');
qry.Excute;
qry.free;
end;

来晚了,
楼上的大侠们都说对了,这是这是用sql语句的方法,,,,,

Table1.Close;
Table1.DatabaseName:=ExtractFileDir(Application.exename);
Table1.TableName:='people.db';
Table1.Open;
Table1.First;
while not Table1.Eof do
begin
table1.fieldbyname('fieldname').asinteger:=table1.fieldbyname('fieldname').asinteger+1;
table1.Next;
end;

用Query呢？

如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？

如果用Query呢？
如果用Query呢？如果用Query呢？
如果用Query呢？如果用Query呢？如果用Query呢？
如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？
如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？
如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？如果用Query呢？

adoquery1.close;
adoquery1.first;
while not adoquery1.eof do
adoquery1.fieldbyname('fieldname').asinteger:=table1.fieldbyname('fieldname').asinteger+5;
adoquery1.next;
end;

with adoquery1 do
begin
close;
sql.clear;
sql.add('select * from table');
open;
end;
while not adoquery1.eof do
begin
adoquery1.fieldbyname('fieldname').value:=adoquery1.fieldbyname('fieldname').value+5;
adoquery1.next;
end[]