DELPHI中动态获得SQLSERVER数据库名

str:=Table1.Tablename;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(format('select * from %s',[Str]));
Query1.Open;

本文地址：http://com.8s8s.com/it/it4944.htm