Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 03-06-2023
marilinspi marilinspi is offline
Miembro
 
Registrado: ene 2007
Posts: 145
Poder: 18
marilinspi Va por buen camino
Primeros n registros paradox

Hola, quiero obtener los primeros N registros de una tabla, uso delphi 7 y paradox
ya probé TOP, FIRST, LIMIT... nada me funciono
alguna idea?
gracias desde ya
Responder Con Cita
  #2  
Antiguo 03-06-2023
Avatar de brakaman
[brakaman] brakaman is offline
Miembro Premium
 
Registrado: ago 2006
Ubicación: Castellon - España
Posts: 290
Poder: 19
brakaman Va por buen camino
Hola amigo:

No se si te he entendido bien, sino es esto perdona. pero...
Código Delphi [-]
Var 
  N, i : Integer;
begin
N := 20;  // Primeros 20 registros.
// Ya teniendo la tabla creada y abierta (claro). 
Tabla1.First;
    for i := 1 to N do
    begin
      if not Tabla1.EOF then
      begin
        // Acceder a los campos.
        // Por Ejemplo: Memo1.Lines.Add(Tabla1.FieldByName('Campo1').AsString);
        
        Tabla1.Next;
      end
      else
        Break; 
    end;
end;
// Cerrar tabla. Tabla1.Close, liberar recursos ....

Saludos.

Jose.
Responder Con Cita
  #3  
Antiguo 03-06-2023
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.257
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Se supone que quiere hacerlo con SQL. Desconozco sin con paradox es posible.
Responder Con Cita
  #4  
Antiguo 03-06-2023
manelb manelb is offline
Miembro
 
Registrado: mar 2017
Posts: 297
Poder: 8
manelb Va por buen camino
Nosotros hemos trabajado con paradox durante muchos años y hemos ido descubriendo características realmente interesantes y sorprendentes para lo que es paradox(ahora me viene a la cabeza la revolución que representó para mi el descubrimiento de las vistas en paradox), pero no creo que en sql para paradox exista el equivalente de FIRST, TOP, LIMIT de otros sistemas.
Responder Con Cita
  #5  
Antiguo 04-06-2023
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.257
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Puede crear un store procedure que devuelva el número de registros que se quiera, se le puede pasar la sentencia y el número.
Algo similar a esto:


Código SQL [-]
SET TERM ^ ;

CREATE PROCEDURE SelectWithLimit (
  p_SelectStatement VARCHAR(1000),
  p_RecordCount INTEGER
)
RETURNS (
  ResultField1 ,
  ResultField2 ,
  -- Agrega más campos según tus necesidades
)
AS
DECLARE VARIABLE RowCount INTEGER;
BEGIN
  RowCount = 0;

  FOR EXECUTE STATEMENT p_SelectStatement INTO :ResultField1, :ResultField2
  DO
  BEGIN
    RowCount = RowCount + 1;
    SUSPEND;

    IF (RowCount >= p_RecordCount) THEN
      EXIT;
  END
END^

SET TERM ; ^
Responder Con Cita
  #6  
Antiguo 04-06-2023
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.257
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Para usarlo, con un ejemplo se entiende:


Código SQL [-]
SELECT * FROM SelectWithLimit('SELECT * FROM tu_tabla', 10);
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
consulta sql traer todos los registros menos los primeros 8 jangel_ramirezm SQL 5 12-09-2008 19:50:46
Obtener los 30 primeros registros de un ClientDataSet David Conexión con bases de datos 7 21-04-2008 18:47:44
Maximo registros en paradox!! CARSOFT_AR Tablas planas 5 22-01-2007 12:53:00
Exportar registros Paradox Iskariote0087 Varios 1 11-01-2006 12:07:57
paradox 7 guardar registros Mariana Conexión con bases de datos 3 12-11-2004 19:16:28


La franja horaria es GMT +2. Ahora son las 01:29:29.


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
Copyright 1996-2007 Club Delphi