Следуйте инструкциям в видео ниже, чтобы узнать, как установить наш сайт как веб-приложение на главный экран вашего устройства.
Примечание: Эта функция может быть недоступна в некоторых браузерах.
Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нем неправильно. Необходимо обновить браузер или попробовать использовать другой.
Ответ: Артистик текст в X3 становится вертикальным
Попробуй паки поставить на ХЗ, хотябы первый. Можд из за приложения какого. Посмотри что общего на компах стоит... хотя странно всё это
Ответ: Артистик текст в X3 становится вертикальным
А на этих независимых машинас случайно не одна и таже винда стоит? А ХЗ с каким паком? И нет ли вирусов случайно?
Ну прям меджик какойто!!!
Ответ: Макрос: Тень для векторных объектов
Вот новая версия.
Тепрь в полях ввода обводки и сдвига можно вводить числа типа "0.5".
Добавлены поля ввода для цветов CMY. Появились галочки Мультиплей и Групп(для группировки объекта с тенью).
Тепеперь можно делать не только тень, но и "сияние"...
Ответ: Макрос AutoClipper - автоматическая обтравка прозрачных битмапов.
Ну и дерзай тогда
Вот нашел ещё одно применение кроме основного: Делать мои тени после обработки битмапа твоим скриптом. Мой скрипт ведь тока с вектором работат
Собственно макрос делает тень для векторных объектов.
Зачем это надо?
Посмотрите на скриншот и поймёте
(Моя тень - сверху, Кореловская тень - снизу)
За написание и работу макроса сильно не бить, я только начинаю изучать макросы.
Если кто доработает или чё ещё подскажет буду тока рад...
Ответ: Макрос AutoClipper - автоматическая обтравка прозрачных битмапов.
Могу посоветовать в значении отступа добавить возможность отступа в минус. Ну и запоминть работу макроса в одну комманду отмены.
Ответ: Макрос: Конверт оле объектов (вопрос по перемещению объектов)
Во, работат.
Надеемся что никто не догадается засунуть ОЛЕ в поверклип :)
Sub convertOLEtoShape2()
Dim p As Page, oldP As Page, shapes As New ShapeRange
Set shapes = ActiveSelectionRange: Set oldP = ActivePage...
Ответ: Проблема установки шрифтов и решение этой проблемы в Корел Дро Х3!
11 Корел со шрифтами работает иначе. Начиная с 12 корел стал полностью юникодным и поэтому "кривые" шривты больше не работают
Ответ: Макрос: Конверт оле объектов (вопрос по перемещению объектов)
Вот как в этом:
Sub convertOLEtoShape2()
Dim p As Page, oldP As Page, shapes As New ShapeRange
Set shapes = ActiveSelectionRange: Set oldP = ActivePage
'boostStart "Convert OLE to Shape"
If shapes.Count =...
Ответ: Проблема установки шрифтов и решение этой проблемы в Корел Дро Х3!
2suntory
Точно... :-)
В ХЗ работаю уже пол года и ещё ни разу не видел квадраты. Один раз тока принесли файл из 9-й версии где русские слова были набраны в латинской кодировке. Но помог "Энкод" в кореле. К своему...
Ответ: CorelDraw12 - проблемы с форматом eps
С епс Корел туговато работает. Можно епс перегнать дистиллером в пдф и всавлять его. Ещё и приимущество есть: если вставить епс, то градиенты побьются на плашки с ровной заливкой (на лапшу), а вот если вставлять пдф то градиенты останутся градиентами
Вот написал..., а как заставить ставить объект после вставки на место вырезанного Оле объекта, а то они все в центр листа складываются?
Sub convertOLEtoShape()
Dim s As Shape, t As Shape, r As New ShapeRange, l As Layer, c As Long
Set r = ActiveSelectionRange: Set l = ActiveLayer: c =...
Вот есть такое и оно работает
Sub textCorrectorIo()
Dim s As Shape, r As New ShapeRange, c As Long
Set r = ActiveSelectionRange: c = 0
For Each s In r
If s.Type = cdrTextShape Then
s.Text.Replace "ё", "е", False, ReplaceAll:=True
c = c + 1
End...
На данном сайте используются cookie-файлы, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших cookie-файлов.