var
  List: TStringList;
begin
  List := TStringList.Create;
  SQLConnection1.GetTableNames(List);
  连接MySql,List中能得到数据(表名).
  连接Sql Server,List中不能得到数据(表名).
end;