请教大家,有没有什么好的方法,对数据库的操作,分不够马上加,求最佳写法

Question

try
    FparentJB_ZB.Topenconn;  //数据库联接判断
    with dm.ADO_CZ do
    begin
      close;
      sql.Clear;
      sql.Text:='insert into info_spxx('+
       '(条形码,商品编码,商品名称,类别,规格,单位,件包装数,产地,录入员,录入日期,启用标志,,说明,备注)'+
       'values(:txm,:spbm,:spmc,  :lb, :gg, :dw,  :jbzs,  :cd, :lry,select getdate(),:qybz,:sm,:bz)';
      parameters.ParamByName('txm').Value:=E_txm.Text;
      parameters.ParamByName('spbm').Value:=E_spbm.Text;
      parameters.ParamByName('spmc').Value:=E_spmc.Text;
      parameters.ParamByName('lb').Value:=E_lb.Text;
      parameters.ParamByName('dw').Value:=E_dw.Text;
      parameters.ParamByName('jbzs').Value:=E_jbzs.Text;
      parameters.ParamByName('cd').Value:=E_cd.Text;
      parameters.ParamByName('lry').Value:=czy;
      parameters.ParamByName('qybz').Value:=C_bz.Checked;
      parameters.ParamByName('sm').Value:=E_sm.Text;
      parameters.ParamByName('bz').Value:=E_bz.Text;
      prepared;
      execsql;
      FSpxx_zb.btnSearchClick(nil);//显示增加记录
    end;
  except
    showmessage('增加失败!');
  end; 
  请指教大家有没有什么比较好的方法,可以等同上面的功能,比如使用结构SQL语句之类

Answer 1

你这样写，还不如直接在ADO_CZ 上操作呢adoCZ.close;
adoCZ.command:='select * from info_spxx where 1=0';
adoCZ.open;
 
ado.append;
ado.fields[].asstring:=你的值
ado.post;
//显示

Answer 2

ado  open;
     edit;
     field =  ;     
     post;
     insert
     delete;close;

Answer 3

用ADOCommand控件直接INSERT进去
try
  ADOCommand.CommandText := INSERT info_spxx VALUES ( ... );
  ADOCommand.Execute;
except
  ...
end;

Answer 4

可以这样写
try
    FparentJB_ZB.Topenconn;  //数据库联接判断
    with dm.ADO_CZ do
    begin
      close;
      sql.Clear;
      sql.Text:='insert into info_spxx('+
       '(条形码,商品编码,商品名称,类别,规格,单位,件包装数,产地,录入员,录入日期,启用标志,,说明,备注)'+
       'values('''+edit1.text+''','''+edit2.text+''''....)'
execsql;
      FSpxx_zb.btnSearchClick(nil);//显示增加记录
    end;
  except
    showmessage('增加失败!');
  end; 

Answer 5

用dbedit不就行了
append;
post;

Answer 6

这样写没什么麻烦的啊....
遇到类型转换的时候你才会发现用ParamByName的好处..偶曾经遇到过名称是:    中国银行' 或  '中国银行这样的话用楼上的楼上的那种写法铁定出错

Answer 7

直接用DBEDIT关联数据库，APPEND简单

Answer 8

用UpdateSQL吧，有 insert, delete...