Hola,
estoy realizando una aplicacion en delphi 5 para generar presuspuesto con base de datos en paradox, tengo el formulario presupuestos, en el cual se pueden dar de alta, modificar, eliminar y buscar, mi problema es a la hora de buscar un presupuesto ya que realizo lo siguiente:
procedure TFormBusPresupuesto.EditBusPresupuestoChange(Sender: TObject);
begin
if EditBusPresupuesto.Text = '' then QueryBuscaPresupuesto.Filtered:=false
else
begin
if length(EditBusPresupuesto.text) <= 10
then
QueryBuscaPresupuesto.Filter:='Idpres='''+EditBusPresupuesto.Text+'*''';
QueryBuscaPresupuesto.Filtered:=true;
end;
end;
El campo (clave) Idpress es de tipo longInt y recoge el numero de presupuesto, pues al realizar el filtro creo que no concuerdan los tipos, ya que EditBusPresupuesto.Text es string,
Gracias de antemano.
