把 From =:Str的等号去掉
解决方案 »
- delphi2009如何安装cxgrid控件
- 100分求毕业设计进销存源码
- interbase 的存储过程
- 谁有installshield6.22安装密码?
- 请指教CREATE()所代不同参数时的含义?
- 在线请教:如何对一个树组按照树组内值的大小进行排序,并且求出50%的那个点的值
- TreeView 的节点问题,急
- 如何将硬盘上任意位置的一个.dbf文件复制到后台SQL server数据库中,与后台数据库链接可以通过别名,而这个.dbf数据无法定义别名。
- 求一滑动杆控件?
- delphi6+sql2000在数据库连接(用BDE)时遇到怪问题,请看........
- 关于从文本文件转到数据库的问题,十分急!
- 如何能得到下一个得到焦点的控件名呢?
With Query1 do
Begin
Query1.Close;
Sql.Clear;
Sql.Add(Str);
Open;
End;
你试试吧。
请留下联系方式,多联系!
Email:[email protected]
大概是这样,没办法测试。
而且你的查询没有设置数据库,好像查询语句写的也不对。
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Select * from ' + str);
Query1.Open;
Query1.Close;
Query1.DatabaseName := Table1.DatabaseName
Query1.SQL.Clear;
Query1.SQL.Add('Select * from ' + str);
Query1.Open;
str:=Table1.Tablename;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(format('select * from %s',[Str]));
Query1.Open;
2。你的程序“
str:=Table1.Tablename;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('Select * from =:Str');
Query1.params[0].asstring:=str;
Query1.Open;
”
其中把数据表名称作为一个参数传给SQL script,根据我的经验,是不能把数据表名作为 TQuery,TTable的SQL的参数的。只能用预先拼接好的SQL script。
var
cSql, cTable: string;
begin
cTable := Table1.Tablename;
cSql := 'select * from %s ';//
cSql := Format(cSql, [cTable]);
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(cSql);
Query1.Open;
end