Задача такая. Очистить поля от мусора.
В принципе, всё просто. Перебираем все ActiveSpread.PageItems, сравниваем их координаты с координатами текущей страницы и удаляем. В этом проблем нет.
Проблема в другом... Текстовые фреймы. А точнее, перетекание. Ведь нельзя удалять ПЕРВЫЙ фрейм в цепочке, если он лежит на полях: текст перетекает.
Однако надо удалять первый фрейм в цепочке (и всю цепочку), если она целиком на полях. И т.п.
У фрейма есть ссылки: TextFrame.LastFrame - последний в цепочке
TextFrame.FirstFrame - аналогично...
TextFrame.NextFrame и TextFrame.PreviousFrame - соответственно, следующий и предыдущий.
Так вот... Если перебирать фреймы методом
For each Frame in MySpread.PageItems
а внутри - шагать по чепочке (NextFrame...) и проверять всю эту байду, удаляя при необходимости - то это не только громадный геморрой, но еще так и не получится. Ведь... блин, мозги уже кипят...
Одним словом... Люди... Подбросьте просто идейку.
В принципе, всё просто. Перебираем все ActiveSpread.PageItems, сравниваем их координаты с координатами текущей страницы и удаляем. В этом проблем нет.
Проблема в другом... Текстовые фреймы. А точнее, перетекание. Ведь нельзя удалять ПЕРВЫЙ фрейм в цепочке, если он лежит на полях: текст перетекает.
Однако надо удалять первый фрейм в цепочке (и всю цепочку), если она целиком на полях. И т.п.
У фрейма есть ссылки: TextFrame.LastFrame - последний в цепочке
TextFrame.FirstFrame - аналогично...
TextFrame.NextFrame и TextFrame.PreviousFrame - соответственно, следующий и предыдущий.
Так вот... Если перебирать фреймы методом
For each Frame in MySpread.PageItems
а внутри - шагать по чепочке (NextFrame...) и проверять всю эту байду, удаляя при необходимости - то это не только громадный геморрой, но еще так и не получится. Ведь... блин, мозги уже кипят...
Одним словом... Люди... Подбросьте просто идейку.