如何正确拼QUERY的SQL语句串，确保引号匹配正确

Question

SELECT SUM(VOUCHER.JJE),SUM(VOUCHER.DJE), 
    (SUM(VOUCHER.JJE)-SUM(VOUCHER.DJE)) as BeginBalance,
     VOUCHER_HEAD.DAY, VOUCHER.KMDM 
 FROM VOUCHER, VOUCHER_HEAD
 WHERE (VOUCHER.PZ_ID = VOUCHER_HEAD.PZ_ID)
  and yearof(VOUCHER_HEAD.DAY)= (lyear-1)
     'GROUP BY VOUCHER.KMDM, VOUCHER_HEAD.DAY';lyear：是程序中定义的变量，取StrTOInt(combox.text)请高手帮忙匹配一下引号问题。

Answer 1

sql.text:='SELECT SUM(VOUCHER.JJE),SUM(VOUCHER.DJE), 
    (SUM(VOUCHER.JJE)-SUM(VOUCHER.DJE)) as BeginBalance,
     VOUCHER_HEAD.DAY, VOUCHER.KMDM 
 FROM VOUCHER, VOUCHER_HEAD
 WHERE (VOUCHER.PZ_ID = VOUCHER_HEAD.PZ_ID)
  and yearof(VOUCHER_HEAD.DAY)='+inttostr(lyear-1)+
     '  GROUP BY VOUCHER.KMDM, VOUCHER_HEAD.DAY';