lo que pasa es que estas accediendo a un Dataset, el cual no tiene esta propropiedad. Si aseguras de que es un TTable al que esta enganchado, puedes hacer un "casteo"
Código:
if DBgrid.DataSource.DataSet is TTable then
TTable(DBgrid.DataSource.DataSet.indexname) := 'indice';