Question

delphi中用adocommand控件用SQL语句创建表，如果创建表的表名要由edit1控件中来，该怎么写？求教.

s:='drop table :p1';
s:=s+' create table :p1(a int,b int)';
adocommand1.CommandText:=s;
adocommand1.Parameters.ParamByName('p1').Value:=strtoint(edit1.text);
adocommand1.Execute;
怎么改？adocommand控件需要和其他控件配套使用么？要设置哪些属性？

Answer 1

1.这个控件可以单独使用.也可以配用其它控件一起使用.如假设你已经添加了ADOConnection1 .把
adocommand1的Connection属性选设为ADOConnection1.这时你要自己设好ADOConnection的ConnectionString.(像设adocommand1的一样).
2. 这句adocommand1.Parameters.ParamByName('p1').Value:=strtoint(edit1.text);最好改成adocommand1.Parameters.ParamByName('p1').Value:=Trim(edit1.text);
Trim()函数是去掉Edit1.text的前后空格.

追问

都设置正确，但是结果还是出错。。。说是p1参数not found！求解

追答

可能的原因:.你是p1传入的值是空值.

Answer 2

写表名的地方 直接使用edit1.text代替就可以了