如何在combobox1.items里面显示出数据库的tablename ,马上给分。

Question

  //BDE
  Session.GetTableNames('DBDEMOS', '*.db', False, False, ComboBox1.Items);
  //ADO
  ADOConnection1.GetTableNames(ComboBox1.Items);

Answer 1

  //BDE
  Session.GetTableNames(ComboBox1.Text, '*.db', False, False, ComboBox2.Items);

Answer 2

我是ORACLE 数据库，
BDE；连接，
会出错，不知为何，。谢谢你回答，等下我，15 分给你，

Answer 3

用的是什么数据库？
Sql Server?

Answer 4

  //BDE
  Session.GetTableNAmes(CombBox1.Text, '*.*', False, False, ComboBox2.Items);//你也可以直接写SQL语句获取
  select last_ddl_time from user_objects
  /*where object_type = '?';*/

Answer 5

Sql Server   里面可以这样：
取得所有数据库
select name from master..sysdatabases 
取得开库下所有数据表（用户建）
select * from xxx..sysobjects where type = 'U'
xxx是数据库名
不知道Oracle里面是不是一样的?

Answer 6

zswang(伴水)(需要充充电)
真厉害！！！！

Answer 7

var
  MyStringList:TStringList;
begin
  MyStringList:= TStringList.Create;
  try
     Session.GetDatabaseNames(MyStringList);
  { fill a list box with database names for the user to select from }
     ComboBox1.Items:= MyStringList;
  finally
     MyStringList.Free;
  end;
//  Database.GetTableNames(ComboBox1.Items,false);
//BDE
//  Session.GetTableNames('DBDEMOS', '*.db', False, False, ComboBox2.Items);
  Session.GetTableNames(ComboBox1.Items.Text, '*.db', False, False, ComboBox2.Items);
end;