Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   ADOTable y Record Pointer (https://www.clubdelphi.com/foros/showthread.php?t=13449)

Carlex 19-08-2004 04:29:04

ADOTable y Record Pointer
 
Buenas, mi pregunta es muy simple, cual es la funcion o metodo para mover el puntero(Record Pointer) dentro de una BD? Es decir deseo ir al registro Nro 50, y poner el puntero alli, las propiedades del ADOTable permiten ir al primero First y al ultimo Last, pero como voy al medio o al registro 20. Muchas gracias por la ayuda de antemano o alguna idea :(

roman 19-08-2004 04:47:29

No todas las bases de datos permiten colocarte en un registro por número pero puedes probar usando la propiedad RecNo:

AdoTable1.RecNo := 50;

// Saludos

jachguate 19-08-2004 06:57:45

Se que no es óptimo... pero también valdria:
Código Delphi [-]
Procedure IrAlRegistroNo(ds: TDataSet; NoRec : Integer);

Var
  i : Integer;

Begin
  ds.first;
  for i := 1 to NoRec do
    ds.next;
end;

En una implementación real, por lo menos habría que verificar que el dataste esté abierto y que no se alcance el final del mismo antes de llegar al registro deseado.

Hasta luego.

;)

roman 19-08-2004 09:37:03

Cita:

Empezado por jachguate
Código Delphi [-]
Procedure IrAlRegistroNo(ds: TDataSet; NoRec : Integer);

Var
  i : Integer;

Begin
  ds.first;
  for i := 1 to NoRec do
    ds.next;
end;

Mmm.., bueno, en este caso podríamos simplificar un poco:


Código Delphi [-]
Procedure IrAlRegistroNo(ds: TDataSet; NoRec : Integer);
Begin
  ds.first;
  ds.moveby(NoRec);
end;

De cualquier forma quizá cabe aclarar que normalmente no es buena idea depender de la posición física de los registros.

// Saludos


La franja horaria es GMT +2. Ahora son las 03:49:23.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi