高手请进！(50分)

procedure TForm1.Button1Click(Sender: TObject);
begin
with unit2.DataModule2 do
begin
ADOCommand1.CommandText:='insert into log(name,st,ft) values (name=:name,st=:st,ft=:ft)';
ADOCommand1.Parameters.ParamByName('name').Value :='s1';
ADOCommand1.Parameters.ParamByName('st').Value :='s2';
ADOCommand1.Parameters.ParamByName('ft').Value :='s3';
ADOCommand1.Execute ;
// ADODataSet1.Recordset :=unit2.DataModule2.ADOCommand1.Execute ;

end;
end;
//错误提示：至少有一个参数没有设定！
这是咋回事儿！
ADODataSet1.Recordset :=unit2.DataModule2.ADOCommand1.Execute ;
这句话有没有用处？

看这样：
adocommand1.CommandText := 'insert into log(name,st,ft) values name,:st,:ft);' ; //Important
adocommand1.Parameters.ParamByName('name').Value := 's1' ;
adocommand1.Parameters.ParamByName('st').Value := 's2' ;
adocommand1.Parameters.ParamByName('ft').Value := 's3' ;
adocommand1.Execute ;
另外：
ADODataSet1.Recordset :=unit2.DataModule2.ADOCommand1.Execute ;
也会出错，因为Insert into 语句没有结果集合返回给ADODataSet1.Recordset