回 帖 发 新 帖 刷新版面

主题:如何实现添加功能

例:向数据库中添加姓名和年龄,用了query,dbgrid,database,edit1,edit2,button1控件,请问怎么添加,代码怎么写。
 我自己这样写的不过有问题 不知道为什么?
 with query1 do
 begin
 query1.close;
 query1.sql.clear;
 query1.sql.add('select * from t_kaosheng where(edit1=:tt,edit2=:kk)');
 query1.parambyname('tt').value:=edit1.text;
 query1.parambyname('kk').value:=edit2.text;
 query1.open;
 edit1.text:=fieldbyname('xingming').asstring;
 edit2.text:=fieldbyname('nianl').asstring;
 if query1.recordcount<0 then
 begin
  query1.sql.clear;
  query1.sql.add('insert into t_kaosheng(xingming,nianl)values(:tt,:kk)');
  query1.execsql;
 end;
end;

回复列表 (共3个回复)

沙发

query1.sql.add('select * from t_kaosheng where(edit1=:tt,edit2=:kk)');
其中edit1  和 edit2  是字段名吗?如果是的话,应该这样写:
query1.sql.add('select * from t_kaosheng where edit1=:tt and edit2=:kk');

板凳


谢谢 我已经该了 我自己写了几条多余的代码[em1][em1]

3 楼


 with query1 do
 begin
 query1.close;
 query1.sql.clear;
 query1.sql.add('insert into t_kaosheng(xingming,nianl)values(:tt,:kk)');
 query1.parambyname('tt').value:=edit1.text;
 query1.parambyname('kk').value:=edit2.text;
 query1.execsql;
 query1.close;
 query1.sql.clear;
 query1.sql.add('select * from t_kaosheng');
 query1.open;
 end; 
 该成这样就OK了 呵呵
 
[em1][em1]

我来回复

您尚未登录,请登录后再回复。点此登录或注册