请问如何读取数据集里所有表的名称呢？

我想做一个通用的数据查看程序，思路是这样的：
用ADOConnenting连接数据库，这个数据库要用户自己选择任何一个Acccess数据库
用ADODataset用表的连接任何一个可供选择的表。（数据库里的表）
然后用datasource和Dbgrid显示出来
现在我的问题是怎么才能读取数据集里全部表的名称，并显示出来呢？