Bueno le sumo 11 al count y si funciona no se si sea lo mas opcitmo pero el codigo lo deje asi
Código Delphi
[-]procedure Tformfacturar.BringEleven(var Count: Integer);
begin
datos.sqfacturas.Close;
datos.sqfacturas.SQL.Text:='SELECT * FROM dhistoria WHERE nhistoria = :historia LIMIT :NUM , 11';
datos.sqfacturas.ParamByName('NUM').AsInteger:=Count;
datos.sqfacturas.ParamByName('historia').AsInteger:=StrToInt(ethistoria.Caption);
datos.sqfacturas.Open;
if not datos.sqfacturas.IsEmpty then
begin
while not datos.sqfacturas.Eof do
begin
Lst1.Items.Add(datos.sqfacturas.FieldByName('codigo').AsString);
datos.sqfacturas.Next;
end;
Count:=Count + 11;
end
else Count:= -1