Asunto: Traer Registros de 11 en 11 en delphi y mysql
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;
Publicado:
Mie May 14, 2014 7:32 pm
alonsojpd Administrador/Moderador
Registrado: Sep 16, 2003 Mensajes: 2687
Asunto: Re: Traer Registros de 11 en 11 en delphi y mysql
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!!
Publicado:
Jue May 15, 2014 6:15 am
webmasterplc Excelente usuario
Registrado: Oct 31, 2009 Mensajes: 26
Asunto:
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
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
Visita nuestro nuevo sitio web con programas y contenidos actualizados: Proyecto A