Ver Mensaje Individual
  #1  
Antiguo 22-03-2011
Marcelo_1 Marcelo_1 is offline
Registrado
NULL
 
Registrado: mar 2011
Posts: 1
Reputación: 0
Marcelo_1 Va por buen camino
Busqueda incremental + campo numerico

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;
Responder Con Cita