Consulta SQL en ADOQuery

[[coso]]

Hola, si codigo es entero, no debes poner el QuotedStr. Esta funcion solo es necesaria para strings.

esto tambien...para comparar enteros no debe estar en comillas el valor.

[NestorN]

Hola espero que te sirva el aporte

Código Delphi [-]
QTemp.SQL.Text := 'Select Nombre, Direccion, Telefono, from Clientes '+
                            'where Codigo LIKE '+QuotedStr(Edit1.value)+' )';
QTemp.Active := true;
      If QTemp.RecordCount < 1 then
      begin
         MessageDlg('¡Código de cliente no existe!',mtError,[mbOK],0);
         Edit1.SetFocus;

proba usando LIKE en ves de =. Suerte

[epenor]

Muchas gracias NestorN, Funciona bien.