Busqueda incremental + campo numerico

[Marcelo_1]

Hola gracias por su ayuda estoy poco tiempo en esto de programar es divertido!!!
mi base de datos esta en access y tengo dos campos

nombre tipo
--------- ----
Producto = Texto
Costo = Número

me da error cuando realizo el filtro con el campo Costo, como ya di a conocer soy nuevo y no doy con la solucion gracias.
codigo :

Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
var
 campo : String;
 begin
   ADOTable1.Filtered := False;
   if (Edit1.Text <> '') and (Edit1.Text <> 'buscar...') then begin
   Campo:= ComboBox1.Text+' Like ' ;
   ADOTable1.Filter := Campo + QuotedStr('*' + Edit1.Text + '*');
   ADOTable1.Filtered := True;
  end;
end;