strsql:='select a.recordid,a.produceid,a.prodid,a.recorddate,b.personnm,sum(b.avgtime)';
strsql:=strsql+'from pdl_pdlrecord1 a inner join pdl_pdlrecorddtl1 b on a.recordid=b.recordid';
strsql:=strsql+'where b.personid='''+edtcomb1.text+''' and a.prodid='''+edit1.text+''' and (a.recorddate>='''+wwdatecombodlg1.text+''' and a.recorddate<='''+wwdatecombodlg2.text+''')';
strsql:=strsql+'group by a.recordid,a.produceid,a.prodid,a.recorddate,b.personnm';
with query1 do
begin
close;
sql.clear;
sql.add(strsql);
open;
end;
帮忙看一下,上面的那里出错了,在查询分析器中 SQL 没问题,在delphi中提示 sql b附近语法有问题。
strsql:=strsql+'...'
要在前面加空格,不然变成:
select a.recordid,a.produceid,a.prodid,a.recorddate,b.personnm,sum(b.avgtime)from...