没有出错信息,insert 接着 post ,开始没问题可以添加,后来执行了语句,但纪录没加进去,重启动后又好了。

解决方案 »

  1.   

    to vince12() 
    需要吗?
      

  2.   

     with table1 do
             begin
                        open;
                         insert;
                          fieldbyname('价格').AsString:=edit5.Text;
                           fieldbyname('何处购得').AsString:=edit3.Text;
                           fieldbyname('内容简介').AsString:=memo1.Text;
                           fieldbyname('购入时间').AsString:=edit2.Text;
                           fieldbyname('数量').AsInteger:=shuliang;
                           gdbh:=edit1.Text;
                           post;
    就一段时间有问题