当前位置:编程学习 > C#/ASP.NET >>

望高人解释下

有两个事件不太理解,望高人解释。

第一个:
begin
  adoq_paall.Close;
  adoq_paall.SQL.Clear;
  adoq_paall.SQL.Text:='select * from materials where 1=2';
  adoq_paall.Open;
  adoq_paall.Append;
  Count:=1;
  dbg_pa.Columns[0].ReadOnly:=False;
  btn_pasa.Enabled:=true;
end;



第二个:
var
  sql1,sql2:string;
begin
  sql1:='select * from materials where 1=1';
  if trim(edt_paid.text)<>'' then
    sql2:=' and MId_='''+trim(edt_paid.text)+'''';
  if trim(edt_paid.text)<>'' then
    sql2:=sql1+' and ProName_='''+trim(edt_pana.text)+'''';
  if trim(edt_pasp.text)<>'' then
    sql2:=sql2+' and Spec_='''+trim(edt_pasp.text)+'''';
  if trim(edt_paun.text)<>'' then
    sql2:=sql2+' and Unit_='''+trim(edt_paun.text)+'''';
  adoq_paall.close;
  adoq_paall.sql.text:=sql1+sql2;
  adoq_paall.open;
  edt_paid.text:='';
  edt_pana.text:='';
  edt_pasp.Text:='';
  edt_paun.text:='';
  btn_pasa.Enabled:=false;
end;

初学delphi数据库组件的开发,希望能详细些,谢谢。 --------------------编程问答-------------------- 第一个:
begin
  adoq_paall.Close;//关闭数据集
  adoq_paall.SQL.Clear;//清空sql语句
  adoq_paall.SQL.Text:='select * from materials where 1=2';//写sql语句
  adoq_paall.Open;//打开数据集
  adoq_paall.Append;//添加记录
  Count:=1;
  dbg_pa.Columns[0].ReadOnly:=False;//设置只读
  btn_pasa.Enabled:=true;
end;

第二个,就是拼一个sql语句,然后adoq_paall打开 --------------------编程问答-------------------- 不知你是不能理解这两个事件要实现的功能,还是不能理解这两种方式的写法。
第一个事件:在adoq_paall打开数据库不查询出任何数据后添加一行空数据行;
第二个事件:根据组合SQL(sql1+sql2)查询出符合条件的数据;
--------------------编程问答-------------------- 连接 sql的数据源   …… 
ls bdmh 正解 --------------------编程问答-------------------- ls bdmh 正解 --------------------编程问答-------------------- 这个也太简单了吧 --------------------编程问答-------------------- 我也在学习DELPHI,发现数据库查询方面,用VFP比用其它语言方便得多 --------------------编程问答-------------------- 今天是怎么了,挖祖坟呢
补充:.NET技术 ,  其他语言
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,