[CDR X5-X8] Индикатор выполнения макроса.

[tohaa]

Добрый день. Подскажите как во время выполнения макроса вывести индикатор выполнения макроса. Обрабатываемые файлы достаточно большие и очень хочется видеть, что Корел еще не умер. Идеальный вариант или что-то подобное:

А также можно отключить обновление поля документа, т.к. вероятно это занимает ресурс.

 

[_MBK_]

Идеальный вариант или что-то подобное:

Progress Bar - OberonPlace.com Forums

отключить обновление поля документа

Optimization = True
EventsEnabled = False
ActiveDocument.PreserveSelection = False

оно?

 

[tohaa]

Progress Bar - OberonPlace.com Forums

Optimization = True
EventsEnabled = False
ActiveDocument.PreserveSelection = False

оно?

Оптимизация - да, а процесс бар не совсем такой как хотелось бы. Большое спасибо. Я не нашел и такого).

 

[dastin]

Я не нашел и такого).

на основе примера с созданием 1000 прямоугольников
шаблон макроса прогрессбара
без привлечения API и референса MS ProgressBar - который на х64 версиях может иметь проблемы
сам прогрессбар - ход выполения, время выполнения, оставшееся время и проценты - лишнее удалить

 

[tohaa]

Progress Bar - OberonPlace.com Forums

Optimization = True
EventsEnabled = False
ActiveDocument.PreserveSelection = False

оно?

Включение оптимизации в начале макроса и отключение в конце со 100% вероятностью кладет корел. Попробовал все три параметра сразу и по отдельности- результат один - объекты изчезают с рабочего поля и больше не появляются) корел(2018й) при этом склеивает ласты.

 

[_MBK_]

На 2018 не пробовал, но на X6 работает замечательно

 

[dastin]

На 2018 не пробовал

а вот оне такие, эти новые версии ...
возьмём вышеозначенный шаблон - заметим, что в макете ни грамма текста - и всё ж - Х7 рисует с оптимизацией 1000 штук за секунду, а 2018 за две

 

[_MBK_]

Х7 рисует с оптимизацией 1000 штук за секунду, а 2018 за две

Так у тебя в 2018 оптимизация таки работает?

 

[dastin]

так она работает на шаблоне прогрессбара .
а у tohaa, макрос с уймой текста, который ещё к тому же надо исправлять - с оптимизацией или без оной - это . хм...всё

 

[dastin]

Если tohaa не против - могу потестировать - макрос и файл-пример в студию

 

[tohaa]

Если tohaa не против - могу потестировать - макрос и файл-пример в студию

Да у меня в макросе всё очень-очень плохо) Это 100%.
Но тем не менее, благодаря Вам он свою функцию выполняет.
Текст скрипта отправлю личным сообщением. Просьба сюда не публиковать.