Страница 52 из 61

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 14:29
vic7tar
Ну да, пересечение, и ошибок возврата нет.
Наверно правильно, т.к. всё пишется конвейером и такие ситуации должен отслеживать пользователь.

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 14:43
kreator
ИМХО, нужна проверка на пересечение. Программист всё же человек, ошибиться может.

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 14:51
RaFaeL
Я на это уже отвечал как-то. Я пишу в первую очередь враппер. Соответственно, если проверки нет в оригинальной библиотеке, почему она должна быть во враппере? Это надо какие-то свои коды ошибок тогда вводить и т.п. А цель разработки враппера не в этом

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 14:59
Игорь Столяров
Larion писал(а): 19 Март 2020, 10:03 Пересечений не выявил. Объединения ячеек происходят в разных строках без пересечений.
На самом деле это не единственная "проблема" приводящая к созданию битого XLSX.
Здесь просто нужно не упираться рогом, а проверить свой код, особенно когда несколько человек уже сказали о типичной ошибке. ;)

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 15:13
Larion
Спасибо за содействие. Буду разбираться почему строка не добавилась.

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 15:41
kreator
Конечно, во Враппере это неправильно делать. В исходной библиотеке надо делать. И другие проблемы в ней же надо решать. Пусть файл будет кривой. Но он хотя бы должен открыться.

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 16:01
RaFaeL
Да он открывается, только с предупреждением. Говоришь открыть как есть и какой-то открывает

libxlsxwriter for Clarion

Добавлено: 19 Март 2020, 16:08
vic7tar
Да не надо ни там ни там что-то менять. Моё убеждённое мнение - это должен делать пользователь.
Очередь в памяти -> диапазон очередного merge -> дальше простая геометрия пересечения линий и четырёхугольников.
kreator писал(а): 19 Март 2020, 15:41 В исходной библиотеке надо делать.
Ну так сделайте, уверен, что автор на запросный тикет ответит так же, как и я.

libxlsxwriter for Clarion

Добавлено: 20 Март 2020, 1:31
Admin
Короче кто напишет - кидайте сюда. Сделаем ссылку в первом посте.

libxlsxwriter for Clarion

Добавлено: 21 Март 2020, 13:59
vic7tar
Ну, примерно, что-то такое:

Код: Выделить всё

   Program
   Map
      inter_ranges(long first_row, short first_col, long last_row, short last_col), long
   .

diap_range  Queue, pre(dr)
first_row   long
first_col   short
last_row    long
last_col    short.

   Code

      err# = inter_ranges(2, 2, 2, 6)   ; do err_mesage   ! 1диап.
      err# = inter_ranges(3, 5, 7, 8)   ; do err_mesage   ! 2диап.
      err# = inter_ranges(6, 2, 7, 5)   ; do err_mesage   ! 3диап.
      err# = inter_ranges(9, 3, 11, 7)  ; do err_mesage   ! 4диап.
      err# = inter_ranges(10, 5, 10, 7) ; do err_mesage   ! 5диап.

   Return

err_mesage  Routine
   Case err#
        of 0; message('диапазоны не пересекаются|')
        of 1; message('диапазоны пересекаются|')
        of 2; message('ошибка дынных|')
   .

!=====================================================================================================================================
inter_ranges  Procedure(long first_row, short first_col, long last_row, short last_col)
! Return  -  0 - нет пересечения; 1 - есть пересечение; 2 - ошибка в данных
    Code

      If (first_row = last_row and first_col = last_col) then Return 2.
      If (first_row > last_row) then tmp_row# = last_row; last_row = first_row; first_row = tmp_row#.
      If (first_col > last_col) then tmp_col# = last_col; last_col = first_col; first_col = tmp_col#.

      nrq# = Records(diap_range)
      If nrq# = 0 then
         do add_diap_range
         Return 0
      .
         
      Loop i# = 1 to nrq#
           Get(diap_range, i#)
           If ~((first_col > dr:last_col) or (last_col < dr:first_col) or (first_row > dr:last_row) or (last_row < dr:first_row)) then
              Return 1
           .
      .
      do add_diap_range

   Return 0

add_diap_range  Routine
   dr:first_row = first_row ; dr:first_col = first_col; dr:last_row  = last_row; dr:last_col  = last_col
   add(diap_range)
!=====================================================================================================================================
im.png
im.png (3.9 КБ) 6769 просмотров

libxlsxwriter for Clarion

Добавлено: 17 Апрель 2020, 17:59
RaFaeL
vic7tar писал(а): 19 Март 2020, 16:08 Ну так сделайте, уверен, что автор на запросный тикет ответит так же, как и я.
Он кстати на днях так и ответил )
https://github.com/jmcnamara/libxlsxwri ... -607528111

libxlsxwriter for Clarion

Добавлено: 01 Июнь 2020, 0:51
RaFaeL
Обновил версию библиотеки в шапке до 0.9.5, добавлены 2 каких-то вида линейных диаграмм
Надеюсь все для задания типа диаграмм использовали equate иначе вам придется править )

libxlsxwriter for Clarion

Добавлено: 04 Август 2020, 10:58
vic7tar
Что-то не могу сообразить - а как в пустой ячейке установить цвет заливки и цвет шрифта без применения xlsx.Write...()?

libxlsxwriter for Clarion

Добавлено: 04 Август 2020, 22:31
RaFaeL
vic7tar писал(а): 04 Август 2020, 10:58 Что-то не могу сообразить - а как в пустой ячейке установить цвет заливки и цвет шрифта без применения xlsx.Write...()?
Для этого есть специальный метод WriteBlank. Без него - никак )

libxlsxwriter for Clarion

Добавлено: 05 Август 2020, 18:59
vic7tar
RaFaeL писал(а): 04 Август 2020, 22:31 Для этого есть специальный метод WriteBlank. Без него - никак )
Такой же эффект даёт и WriteString(... , chr(0 или 32)).