Club Builder

[Diego F]

Hola

Tengo una base de datos (paradox) con una tabla, la cual tiene dos campos

codigo
nombre

ahora, cuando quiero recorrer la tabla registro por registro desde mi
aplicacion lo hago mediante los metodos next y prior, pero como hago para ir
directamente al registro x donde el codigo sea por ejemplo 3150 pero sin
utilizar un query.

Gracias

[jaquemate]

Puedes utilizar el método Locate para buscar un registro en una tabla o consulta. Si utilizas una tabla y tienes un índice por el campo que estas buscando, puedes usar el método FindKey que será mucho más rápido ya que el campo está indexado.

Busca estos métodos en la ayuda y si no sabes cómo funcionan, dímelo y te pondré un ejemplo.

Un saludo.

[Cesar C. Salazar Gonzalez]

Un ejemplo puede ser este

[ikis]

Si tu tabla esta indexada por codigo y nombre, podrias usar esto

Tabla->SetKey();
Tabla->FieldValues["Codigo"] = 12;
Tabla->FieldValues["Nombre"] = "Juan";
MainForm->HoursTable->GotoKey();

En otro caso podrías usar un filtro de esta manera

Tabla->Filtered = true;
Tabla->Filter = "Codigo=12 AND Nombre = 'Juan'"

luego de hacer lo q desees debes sacar el filtro, ya q este reduce tu DataSet, haciendo visible solo a los registros q cumplen la condición.

[Marky]

Bueno, no puedo aportar nada nuevo a lo que ya te hayan dicho pero bueno... aquí lo que uso yo para "saltar" a registros rápidamente. Pones un TEdit que valdrá como casilla para introducir la "palabra clave":

[TOÑO]

HOLA:

Tambien tienes una solucion mas rapida en cuanto a saltar registros

Table1 ->MoveBy(3500);

Esto salta 3500 regs, si los tienes secuenciales y no hay saltos entre lineas se posicionara en el 3500.

By.

[Diego F]

Gracias a todos por su colaboracion, ya que me ha servido de maravilla.

pero ahora me surge otra duda, y es la siguiente

Cuando ejecuto un query y luego quiero ir a un registro especifico uso la
funcion Locate, asi:

TLocateOptions opcion;

opcion.Clear();
opcions << loPartialKey;

Query1->Locate("codigo", "3058", Opts);

con esto iria al registro x el cual tenga como codigo 3058.

Pero ahora, si quiero hacer lo mismo pero con dos campos, por ejemplo, que
el sexo sea "H" y el nombre tenga los caracteres "ana" (por ejemplo diana,
mariana, ...).

Como podria lograr esto

Espero haberme hecho comprender

Gracias

[TOÑO]

HOLA:

TLocateOptions op;
op.Clear();
op << loCaseInsensitive ;

Variant Variables[2];
Variables[0] = Variant("M");
Variables[1] = Variant("ANA");

if (!Query1->Locate("SEXO,NOMBRE", VarArrayOf(Variables, 1), op))
ShowMessage("El reg no se encontro... ¿Aplico filtro?");

By.