Tema: Busqueda en memoria por mas cercano
Ver Mensaje Individual
  #6  
Antiguo 14-09-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
  
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Jorge.

En la función BuscarDB, reemplazá estas líneas:
Código Delphi [-]
 if Esta then
     Result:= Med
   else
     Result:= Ult;

Por:
Código Delphi [-]
 if Esta then
     Result:= Med
   else
     Result:= Pri;

Saludos
Responder Con Cita