如果Access数据库（db1）里有一个表（1040000251401），怎样取到该表名？

Question

首先用一个DataBase连上该数据库。
然后用TSession.GetTableNames去取即可。

Answer 1

ADOCon: TADOConnection;
Memo1: TMemo;
……ADOCon.adocon.GetTableNames(memo1.Lines);memo1.Lines中间的字符就是你的表名！

Answer 2

首先用一个DataBase连上该数据库，然后用
TSession.GetTableNames即可取得数据库中所有的表名。

Answer 3

字打错了！
ADOCon: TADOConnection;
Memo1: TMemo;
……ADOCon.GetTableNames(memo1.Lines);memo1.Lines中间的字符就是你的表名！

Answer 4

ADOConnection1.GetTableNames(ListBox1.Items, false);

Answer 5

得到表名,放在一个STRINGLIST变量里:
var 
tablename:TStringlist;
 begin
   tablename:=TStringList.Create;
   ADOConnection.GetTableNames(tablename,false);
end;

Answer 6

前提，你要先用adoconnection1连接到你要查看的数据库！
procedure TForm1.Button1Click(Sender: TObject);
var
 str:tstringlist;
 i:integer;
begin
str:=tstringlist.Create;
adoconnection1.GetTableNames(str,false);
for i:=0 to str.Count-1 do
  listbox1.Items.Add(str.Strings[i]);
end;
呵呵，可以给分了吧！