Question

delphi用ADOQuery插入一条记录

procedure Tuserlistform.Button1Click(Sender: TObject);
begin
with ADOQuery1 do
begin
ADOQuery1.Close;
if radiobutton1.checked=true then
begin
ADOQuery1.SQL.clear;
ADOQuery1.SQL.Add('insert into 管理信息表admtable (ID,loginn,username1,password1,quanxian14,quanxian2,remark)values (:s0,:s1,:s2,:s3,:s4,:s5,:s6'); ');
ADOQuery1.Parameters.ParamByName('s0').Value:=trim(Edit1.Text);
ADOQuery1.Parameters.ParamByName('s1').Value:=trim(Edit2.Text);
ADOQuery1.Parameters.ParamByName('s2').Value:=trim(Edit3.Text);
ADOQuery1.Parameters.ParamByName('s3').Value:=trim(Edit4.Text);
ADOQuery1.Parameters.ParamByName('s4').Value:=trim(Edit5.Text);
ADOQuery1.Parameters.ParamByName('s5').Value:=trim(Edit6.Text);
ADOQuery1.Parameters.ParamByName('s6').Value:=trim(Edit7.Text);
ExecSQL;
end
运行提示找不到's0'，希望高手指点

Answer 1

如果仅仅是插入一条数据，不要写得这么复杂
直接用
sql :='insert into 管理信息表admtable (ID,loginn,username1,password1,quanxian14,quanxian2,remark)values ('+trim(Edit1.Text);
+','+...(后面你自己补)
ADOQuery1.SQL.Text := sql;
ADOQuery1.ExecSQL;
这种写法好调试，
如果用你那种方法你要注意ADOQuery1的ParamCheck这个属性

Answer 2

首先，tadoquery的Parameters是要静态创建的，动态赋值
再者，你这也太麻烦了，应该用bfmbfmbfm的方法，直接引用数值

Answer 3

ADOquery用下面的写法：
ADOQuery1.parameters[0].value :=trim(Edit2.Text);
ADOQuery1.parameters[1].value :=trim(Edit3.Text);
ADOQuery1.parameters[2].value
ADOQuery1.parameters[3].value

Answer 4

补充一下:
adoquery1.append;
ADOQuery1.FieldValues[s0]:=trim(Edit3.Text);
adoquery1.post;

Answer 5

...
ADOQuery1.Parameters.Clear;
ADOQuery1.Parameters.CreateParameter('s0', ftstring, pdinput, 32, Trim(trim(Edit1.Text))) ;
...
//ADOQuery1.Parameters.ParamByName('s0').Value:=trim(Edit1.Text);
//ADOQuery1.Parameters.ParamByName('s1').Value:=trim(Edit2.Text);
//ADOQuery1.Parameters.ParamByName('s2').Value:=trim(Edit3.Text);
//ADOQuery1.Parameters.ParamByName('s3').Value:=trim(Edit4.Text);
//ADOQuery1.Parameters.ParamByName('s4').Value:=trim(Edit5.Text);
//ADOQuery1.Parameters.ParamByName('s5').Value:=trim(Edit6.Text);
//ADOQuery1.Parameters.ParamByName('s6').Value:=trim(Edit7.Text);