Hola Elite237, puedes hacer que tu campo sea autoincremental, así no haces nada por codigo, ya que se generara solito.
Ahora otra forma sería que hicieras una consulta obteniendo el Max de tu campo.
Código Delphi
[-]
Query.Close;
Query.Text := 'Select Max(CampoConsecutivo)+1 AS NUM From Tabla';
Query.Open;
NumeroSig := Query.FieldByName('NUM').AsInteger;
Saluditos