procedure TsetupF.Button2Click(Sender: TObject);
begin
  with DM.ADOsysQuery do
  begin
  close;
  sql.clear;
  sql.add('insert ini values(:a,:b,:c,:d,:e,:f)');
  Parameters.parambyname('a').Value:=Trim(edit1.Text);
  Parameters.parambyname('b').Value:=Trim(edit2.Text);
  Parameters.parambyname('c').Value:=Trim(edit3.Text);
  Parameters.parambyname('d').Value:=Trim(edit4.Text);
  Parameters.parambyname('e').Value:=Trim(edit5.Text);
  Parameters.parambyname('f').Value:=Trim(edit6.Text);
  execsql;
  end;
end;运行后写入数据点确定,然后察看数据库,表里面还是以前的老数据,有错误吗?还是那里设置的不对