obtener el ultimo registro resultado de una comparacion

[[eduarcol]]

por sql

Código SQL [-]
Select Max(clave) from tabla where matricula = 100

por codigo

Código Delphi [-]
tabla.first;
while not tabla.eof do
begin
   if valor < tabla.Fieldbyname('clave').asinteger then
      valor := tabla.Fieldbyname('clave').asinteger;
   tabla.next;
end;