[roman]

Creo que más bien algo como:

Código Delphi [-]
var
  Valor, Maximo: Integer;

begin
  Maximo := 0;
  Table.First;

  while not Table.EoF do
  begin
    Valor := Table.FieldByName('campo').AsInteger;
    if Valor > Maximo then
      Maximo := Valor;

    Table.Next;
  end;
end;

Sin embargo pienso que sería mejor tratar de sacar ese valor directamente de la base de datos mediante una consulta SQL.

// Saludos