ayuda con ADOQuery

[[Lepe]]

Con tu permiso modifico el código, creo que falta QuotedStr para encerrar el valor de buscarArticulo.text entre comillas simples. ¿O será que en access son comillas dobles ¿?

Código Delphi [-]
const sqlArticulos = 'Select * from tb_Articulos where %s = %s'
 if (key = #13) then
    begin
      With dm.QBusArticulo do
        begin
          Close;
//          SQL.Clear; En realidad no hace falta, ya que al establecer la propiedad Text
//                        Se hace un Clear internamente.

          if rgBusArticulo.ItemIndex = 1 then
              SQL.Text := Format(sqlArticulos, ['idArtEan',
                                                  QuotedStr(frmBusArticulo.edtBusArticulos.Text)])
          else
              SQL.Text := Format(sqlArticulos, ['Nombre',
                                                  QuotedStr(frmBusArticulo.edtBusArticulos.Text)]);

         Open;
        end;
    end;

En este caso, estoy suponiendo que idArtEan y Nombre son campos de tipo carácter (string, varchar, etc). Si idArtEan es un campo de tipo entero, no hace falta el QuotedStr.

Si QuotedStr no te funciona, prueba a encerrarlo con comillas dobles.

Si no es mucha molestia me gustaría que comentaras la solución (si se resuelve... claro )

Saludos