Hola Parsec.
Lamentablemente el DBGrid no es sino una representación visual del contenido de una tabla. Podrías hacer algo como:
Código Delphi
[-]
function NroRegistros(ADBGrid: TDBGrid): Integer;
begin
Result:= ADBGrid.DataSource.DataSet.RecordCount;
end;
Pero si te fijas bién, verás que en realidad, estas consultando el DataSet. Hay además otro problema, la propiedad
RecordCount no funciona con todos los TDataSets.
Creo que lo mejor es hacerte una función usando una consulta SQL que devuelva el resultado. Si especificas con que motor de BD y componentes estás trabajando sería más fácil aproximar una respuesta.
Un saludo.