没有这么费事,显示字段你就用QRLABEL就可以了,
然后字段值QRDETAIL中加入QRDBTEXT就可以了,将每个QRDBTEXT付为相应字段
将quickrep和qrdbtext的dataset设为dm.query1
再在QUICKREP的BEFOREPRINT的事件中加入:
sqlsect:='select chk_day ,chk_onduty, chk_offduty,chk_addonduty ,chk_addoffduty ,chk_note ';
sqlsect:=sqlsect + 'from tab_chkduty  where sta_id = ''p09000'' order by chk_day  ';
  dm.query1.SQL.Add (sqlsect);
  dm.query1.open;
  

解决方案 »

  1.   

    flowersun(song)老兄:  要这样费事吧!我要对字段中的值处理呢!QRExpr6,QRExpr7,QRExpr8的值是数据库里没有的呀!我要进行判断,再决定显示什么。QRExpr是不是用在可视化编程中与表的字段相关联呀,而QRDBTEXT常用在非可视化编程中?????     If  strtodatetime(chkon)>strtodatetime(timeon) then
          QRExpr6.caption := '遲到';
          If  strtodatetime(timeoff)>strtodatetime(chkoff) then
          QRExpr7.caption := '早退';
          QRExpr8.caption := '8:0';