[marcoszorrilla]

1. Ordenas la tabla por el campo que convenga.
2. Tomas el primero número
3. Haces un bucle recorriendo los registros mientras le vas poniendo el número.

Código Delphi [-]
Var
n:Integer;
begin
n:=LaTAblaQueSea_Numero.Value;

  While Not MiTabla.Eof do
  begin
  MiTabla.Edit;
  MiTAblaCampoxxx.Value:=n;
  n:=n+1;
  MiTabla.Next;
  end;
end;

Un Saludo.