Una curiosidad

[Pandre]

Hola a todos:

Hay casos en los que en mis aplicaciones se me hace necesario contar con una función cuyo funcionamiento lo explico con un ejemplo.
Supongamos que tengo una tabla con 3 campos: ID, NOMBRE, APELLIDO. Entonces, sabemos un valor de ID y de él queremos saber a que NOMBRE pertenece. Es decir, le damos a la función el valor X, y la función buscará en la tabla y devolverá el valor del campo NOMBRE al que pertenece dicha ID.

Yo lo implemento así:

function ObtenerDesdeID(ValorID: string): String;
begin
 if Tabla.FindFirst('ID', ValorID, [loCaseInsensitive]) then
    Result := Tabla.FieldByName('NOMBRE').AsString else
    Result := '';
end;

La verdad es que normalmente me funciona norm, pero a veces me falla.
La pregunta es: ¿sabéis de alguna función que haga lo mismo, pero de forma optimizada?

Gracias de antemano...

[roman]

Pandre comentó:
La verdad es que normalmente me funciona norm, pero a veces me falla.
La pregunta es: ¿sabéis de alguna función que haga lo mismo, pero de forma optimizada?

No veo problema con la función siempre y cuando, claro está, Id sea la llave primaria de la tabla o por lo menos un índice único. Lo que sí, en tal caso yo usaría más bien FindKey en lugar de FindFirst.

// Saludos

[Osorio]

Yo uso Locate, siempre funciona...


Suerte.

[[Lepe]]

yo uso TTable.lookup la ventaja es que no mueve el cursor al registro buscado, así que si se está editando la tabla no pasa nada. En la ayuda de delphi viene un buen ejemplo de su uso.

Saludos

[Voutarks]

Ya no utilizo componentes tipo table, así que las busquedas siempre las hago mediante un componente ligero (que no es navegable, al menos bidireccionalmente) y sql.

Para tu caso, y combinando las dos respuestas anteriores, lo mejor sería utilizar la función locate en el caso de que quieras mover el cursor de conjunto de datos hacia ese registro, o bien lookup si no quieres que se mueva.

[Pandre]

Pues nada...

Simplemente deciros que todo está en orden ahora, por lo que desde aquí os doy las GRACIAS a todos sin excluir a nadie. Vuestra ayuda ha sido muy valiosa.

Gracias de nuevo...