我的代码是这样的 if edit1.text='' then showmessage('不能发空信息!') else begin adoquery1.Close; adoquery1.SQL.Clear; adoquery1.SQL.Text:='insert into 001(呢称,发言,日期) values('''+label1.Caption+''','''+edit1.Text+''','''+jintian+''')'; adoquery1.ExecSQL; adoquery1.Close; adoquery1.sql.Clear; adoquery1.SQL.text:='select top 30 * from 001 order by 排序 desc'; adoquery1.Open; edit1.Clear;