[supermilloriver]

aver:

este es el codigo para cargar y ejecutar el ado:

Código Delphi [-]
           with ADOQAgregar do begin
               //cargo valores a agregar
               with parameters do begin
                  paramByName('comentarios').value := EObservaciones.text;
                  paramByName('Esf').value :=   ADOQGraduacionesCristal.FieldByName('esf').AsFloat;
                  paramByName('Cil').value := ADOQGraduacionesCristal.FieldByName('cil').AsFloat;
                  paramByName('Grados').value := ADOQGraduacionesCristal.FieldByName('grados').AsInteger;
                  paramByName('Organico').value := CBOrganico.Checked;
                  paramByName('NombreColor').value := ADOQColoresCristal.FieldByName('Nombre').AsString;
                  paramByName('montoVenta').value := CEMontoVenta.value;
                  paramByName('nroColorCristal').value := ADOQColoresCristal.FieldByName('nroColor').AsInteger;
                  paramByName('nroGraduacion').value := ADOQGraduacionesCristal.FieldByName('nroGraduacion').AsInteger;
               end;
               ExecSql;
            end;

este es el query:
        'INSERT INTO Cristales (comentarios,esf, cil, grados, organico, n' +
        'ombreColor, montoVenta, nroColorCristal, nroGraduacion)'
      'VALUES'
      
        '(:comentarios, :esf, :cil, :grados, rganico, :nombreColor, :mo' +
        'ntoVenta, :nroColorCristal, :nroGraduacion)')

los tipos de los campos son "standard", o sea integer, float, string;
y el id no lo inserto, uso el autonumerico de access, pero en otro quer en el q solo inserto dos o tres valores (float) funciona bien, asiq no creo q sea problema del autonumerico...

bueno..., espero q sirva de algo...
gracias y saludos
gabriel