var
  ads1:TAdoDataSet;
  dsc1:TDataSource;
  s:string;
begin
  ads1:=TAdoDataSet.Create(self);
  dsc1:=TDataSource.Create(self);
  ads1.Active:=false;
  s:=formatdatetime('yyyy-mm-dd hh:mm:ss',now);
  ads1.Connection:=ADOConnection1;
  ads1.CommandText:='insert into beijing_table (times,tep) values ('''+s+''','''+Edit2.Text+Edit3.Text+''')';
  ads1.Open;
  ads1.Active:=true;
  dsc1.DataSet:=ads1;
  dbgrid1.DataSource:=dsc1;
感觉总是缺少了什么,拜托各位了,谢谢!!!