[firebase-br] Update

[AdrianoCadi]

Preciso fazer um update na tabela do FireBird, estou usando um IBQUERY, mas 
naum da certo.
Vejam abaixo, e me digam oq pode estar de errado
Campo Nota é Integer
Devolvido é Integer;
DataDevolucao é date
Nrregistro é VarChar

 WITH DM.QRTemp DO
 BEGIN
        CLOSE;
        Fields.Clear;
        SQL.Clear;
        SQL.ADD('UPDATE TBVENDAS SET NOTA =   '+CMBNOTA.Text+',DEVOLVIDO = 
1,DATADEVOLUCAO = '
        +Datetostr(strtodate(EDTDATA.Text))+'WHERE NRREGISTRO = 
'+''+REGISTRO.CAPTION+''+'');
        ExecSQL;
  END;