[jhonny]

La verdad es que no lo he probado, pero ¿te funcionaria asi?

Código Delphi [-]
 with dm.qadulto do begin
        close;
        sql.Clear;
        sql.add('update nino set motivo=:0');
        SQL.Add('WHERE cve_cte=:cv');
        parambyname('cv').Value:=cni;
        parambyname('0')..Assign(mc);
        execsql;
    end;

espero que si .