Результаты поиска

Окромя Сlone в CorelDRAW есть еще и сходный функционал - Symbol. В чём-то хуже, в чём-то лучше.

А для текста, имхо, подошла бы не точка, а самая длинная горизонталь

На бублике куча центров, целое кольцо, поэтому "место, куда лучше всего впишется горизонтальный прямоугольник" продолжит оставаться центром

На бублике, имхо, центр лучше был бы не слева, а сверху или снизу. Туды текст из первого поста красивше впишется. Ну, а если это нумератор раскрасок, то тогда всё равно.

Тады уж лучше ABBYY PDF Transformer, он обещается создать/пересоздать текстовый слой в готовом pdf. В т.ч. и рекламки растрированные распознаются и.т. п. А с FineReader'ом ещё возиться придётся. Или в новых версиях он включает данный функционал?

ошибка где-то в районе 2 copy s ne exch f ne or { при замене на заглушку "true {" или на "false {" начинает работать ps особо не знаю, какова на самом деле ошибка не найду, авось много не напортишь ------------------ Заглянул на сайт автора - в свежей версии в includetext вместо "f" - "fn"...

а-а, упустил условие, что и пустышки нужны

Попробуйте безтекстовый вариант. Последняя строка: 15 10 moveto (4820020831233 02) () /ean13 /uk.co.terryburton.bwipp findresource exec showpage У меня выводится без ошибки. Имхо сработал Ваш 1%

TotalСommander + поиск readme.txt + файлы на панель (или Ctrl+B + фильтр readme.txt) + плагин CopyTree/TreeCopyPlus/Treecopy

Со свежераспакованными аналогично, проверял сразу после вскрытия (но несколько лет назад).

MetaNormalC

А я предпочитаю отбивать инициалы неразрывными пробелами фиксированной ширины

Версия трёхдневка: Sub LenArea() ActiveDocument.Unit = ActiveDocument.Rulers.HUnits MsgBox "Length = " & ActiveShape.DisplayCurve.Length & vbCr & "Area = " & ActiveShape.DisplayCurve.Area End Sub

Ламинированная металликом плёнка имхо будет иметь ещё чуть более дальнее сходство (там ещё слой прозрачки добавится) + доп. работа. В подобных случаях зачастую хочется получить представление о результате, а точность пробы это уже бонус. Цветопробные бумаги тоже не имитируют в полной мере...

Как-то сложновато. Вроде бы были металлизированные материалы для струйной печати?

А для жестянщиков или печатников по фольгированным материалам?

В режиме Interactive Fill (G) хватаем паттерн за центральный маркер и таскаем его куда хотим.

вариант:If ActiveDocument Is Nothing Then Exit Sub

Объекты могут находиться на разных слоях, группировка-разгруппировка переместит их на один слой. Я бы воспользовался функцией установки позиции. Да и макрос попроще будет. Sub CenterP() ActiveSelection.SetPositionEx cdrCenter, ActivePage.CenterX, ActivePage.CenterY End Sub

Ваш код не найдёт "рекламу" в клипах (мне для примера данная обвязка не нужна была) оператор "=" сбойнёт на "сером шрифте" (забыл упомянуть его в своём посте), лучше использовать s.Text.Find("реклама", False) (запостил пример с ошибкой "" вместо "реклама", сейчас поправил) Из цикла перебора...