[Resolvido] erro unterminated string

Oi gente,

Sou iniciante no delphi e estou c/ um probleminha... Gostaria q ao gravar os dados de uma tabela fosse dado um insert em outra tabela c/ esses mesmos dados. Para isso eu coloquei o seguinte código no envento afterpost da query:

with quLotaAluno do

begin

 close;

 clear;

 sql.Add('INSERT INTO TBLOTA_ALUNO(CAMPO1, CAMPO2, CAMPO3,.. )

 + 'VALUES(' + QuotedStr(quLotaCAMPO1.AsString) + ','

 + QuotedStr(quLotaCAMPO2.AsString) + ','

 + ... ') ');

 ExecSQL;

end;

porém dá uma mensage de erro unterminated string, e não sei o q pode está errado. Se alguém puder me ajudar...

OBS: Uso Delphi7 c/ SQL SERVER 7 (conexão adoconnetion/adoquery)