table1.Open; table1.First; while not table1.Eof do begin if table1[..]=.. then .. table1.Next; end;
while not MyTable.eof do begin 比较 MyTable.next; en;
var max:integer;with adoquery1 do begin sql.clear; sql.add('select * from table'); open; max := FieldByName('age').asinteger;//比如说提取年龄来比较 while not eof do begin if FieldByName('age').asinteger>max then//逐个比较年龄,得到年龄最大的一个 max := FieldByName('age').asinteger; next; end; showmessage('最大年龄是:'inttostr(max)); end;
table1.First;
while not table1.Eof do
begin
if table1[..]=.. then ..
table1.Next;
end;
begin
比较
MyTable.next;
en;
max:integer;with adoquery1 do
begin
sql.clear;
sql.add('select * from table');
open;
max := FieldByName('age').asinteger;//比如说提取年龄来比较
while not eof do
begin
if FieldByName('age').asinteger>max then//逐个比较年龄,得到年龄最大的一个
max := FieldByName('age').asinteger;
next;
end;
showmessage('最大年龄是:'inttostr(max));
end;