怎么才能获得一个数据库里的所有表的表名？

Question

如题，令外还有就是我怎么才能获得系统中的所有数据库别名〉？

Answer 1

AdoConnect.GetTableNames(lsTable.Items,boolSystemTables);
这是通用接口的，对于别名，可能不同的数据库要用不同的查询才能得到

Answer 2

procedure GetTableNames(List: TStrings; SystemTables: Boolean = False);
DescriptionCall GetTableNames to retrieve a list of tables in the associated database.List is the already-existing string list object into which the tables names are put.Set SystemTables to indicate whether the list of table names should include the database抯 system tables.ADOConnection1.GetTableNames(ListBox2.Items, False);Note: Any contents already in the target string list object are eliminated and overwritten by the data produces by GetTableNames.

Answer 3

Select * From SysObjects
SysObjects中保存着所有数据表的信息