[jorge82]

Hola marcosmendozaa bienvenido a ClubDelphi, como siempre, es conveniente que pases a dar una vuelta por aquí.

No aclaras que tecnología de bases de datos utilizas, pero creo que algo así te podría servir (lo digo de memoria):

Código Delphi [-]
var
  x: Integer;
begin
  ...
  with dm.Qidep do
  begin
    Close;
    SQL.Clear;
    SQL.Add('select count(id_departamento) from departamentos');
    Open;
    x := Fields[0].AsInteger;
    x := x+1;
  end;
end;