Utilizamos cookies propias y de terceros. Al navegar entendemos que aceptas el uso de cookies. +Info.
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Usuario
· Wiki

Proyecto AjpdSoft: Foros

AjpdSoft :: Ver tema - Traer Registros de 11 en 11 en delphi y mysql
Foros de discusión Buscar Perfil FAQ Iniciar sesión
Information Traer Registros de 11 en 11 en delphi y mysql

Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net   
Ver tema anterior :: Ver tema siguiente
AutorMensaje
webmasterplc
Excelente usuario


Registrado: Oct 31, 2009
Mensajes: 26

Asunto: Traer Registros de 11 en 11 en delphi y mysql Responder citando

Buenas estoy realizando una consulta para traer registros de 11 en 11 para eso tenego un contador pero cuando ejecuto la consulta me da un error el codigo para realizarlo es el siguiente.

Código:
var
Count: Integer;

procedure Tformfacturar.BringEleven(var Count: Integer);
begin
  Count:=0;
  datos.sqfacturas.Close;
  datos.sqfacturas.SQL.Text:='SELECT * FROM dhistoria LIMIT :NUM * 11, 11';
  datos.sqfacturas.ParamByName('NUM').AsInteger:=Count;
  datos.sqfacturas.Open;
  if not datos.sqfacturas.IsEmpty then
  begin
    // :: Aqui lo que quieras hacer con los 11 registros obtenidos
    while not datos.sqfacturas.Eof do
    begin
      Lst1.Items.Add(datos.sqfacturas.FieldByName('nhistoria').AsString);
      datos.sqfacturas.Next;
    end;
    // ::
    Inc(Count);
  end
  else Count:= -1
end;

este procedimiento lo llamo desde iun boton
Código:
if Count <> -1 then
  begin
    BringEleven(Count);
  end;
end;
MensajePublicado:
Mie May 14, 2014 7:32 pm
Top of PageVer perfil de usuario
alonsojpd
Administrador/Moderador


Registrado: Sep 16, 2003
Mensajes: 2687

Asunto: Re: Traer Registros de 11 en 11 en delphi y mysql Responder citando



Anuncios



Hola, para limitar una consulta en MySQL se usa:

select * from nombre_tabla
limit num_registro_inicio, num_registros


Parece que tienes un pequeño fallo en la línea:

datos.sqfacturas.SQL.Text:='SELECT * FROM dhistoria LIMIT :NUM * 11, 11';

Que más bien sería:

datos.sqfacturas.SQL.Text:='SELECT * FROM dhistoria LIMIT :NUM, 11';

Prueba esto y nos cuentas.

Saludos!!
MensajePublicado:
Jue May 15, 2014 6:15 am
Top of PageVer perfil de usuario
webmasterplc
Excelente usuario


Registrado: Oct 31, 2009
Mensajes: 26

Asunto: Responder citando

Si al colocarla asi me devuelve los 11 registros pero quisiera que si tiene 20 registros me devuelva los primeros 11 y al volver a darle al boton me devuelva de la 12 a la 20 y asi sucesivamente
MensajePublicado:
Vie May 16, 2014 12:11 am
Top of PageVer perfil de usuario
Mostrar mensajes de anteriores:   
Todas las horas son GMT - 1 Horas
Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net  

Cambiar a:  
Key
  Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro
Este sitio web NO CONTIENE malware, todos los programas con código fuente aquí. Autor: Alonso Javier Pérez Díaz Google+ Síguenos en Google+