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

  1. lev

    [CDR 2017-2023] Виртуальная (временная) линия

    Ну, это из древних закромов код (проапдейтил пост выше, не знаю, заметил ли ты изменения), через WinAPI работающий А так можно и свои инструменты делать. Например: Making a Zig Zag Tool for CorelDRAW and Corel DESIGNER - Docs & Tutorials - Developer Area - CorelDRAW Community, надеюсь там уже...
  2. lev

    [CDR 2017-2023] Виртуальная (временная) линия

    Угу. В зависимости от положения курсора. Там потом в Undo такая каша... Вот под руку попался чей-то моргающий пример без стирания: Public Type lpPoint x As Long y As Long End Type Public BC As Double, AC As Double, AB As Double Declare Function GetAsyncKeyState Lib "user32" (ByVal...
  3. lev

    [CDR 2017-2023] Виртуальная (временная) линия

    Некоторые рисуют-стирают, рисуют-стирают
  4. lev

    Gothic

    А автор делал шрифт? Вектор тут лежит - Glamour Luxury Font Alphabet Set
  5. lev

    Прекращается поддержка шрифтов PostScript Type 1

    Таки перешли?
  6. lev

    Прекращается поддержка шрифтов PostScript Type 1

    Я давно принтеров новых не покупал. На чём сейчас новые лазерники, на pdf перешли?
  7. lev

    Наши поздравлялки - 8

    Всем СПАСИБО!!!
  8. lev

    [AI CC-CC2023] Offset Path с параметрами - новое решение с XML

    var jointype = 2;//0 = Round, 1 = Bevel, >=2 = Miter
  9. lev

    [PS CC-CC2023] High pass или sharpen ?

    А на фотоувеличителе, никто аншарп маск не делал? Помню, в детстве развлекался.
  10. lev

    [CDR X5-X8] Макрос для текстовой подписи размеров фигуры

    https://forum.rudtp.ru/threads/kak-prostavit-razmery-u-vsex-obektov-srazu-dlina-shirina.75922/post-1206097
  11. lev

    [PS CC-CC2023] Полутоновый растр

    В свежих корелах Pointillizer есть
  12. lev

    [CDR 2017-2023] Увеличение цифры в файле при каждом запуске макроса.

    Можно при создании именовать объекты ActiveLayer.CreateArtisticText( 0, 0, "100").Name="Numb" И поиск проводить уже только среди именованных For Each t In ActivePage.Shapes.FindShapes("Numb")
  13. lev

    [CDR 2017-2023] Увеличение цифры в файле при каждом запуске макроса.

    Sub plus1() On Error Resume Next max = -100 For Each t In ActivePage.Shapes.FindShapes(, cdrTextShape) d = CInt(t.Text.Story) If d > max Then max = d Next t ActiveLayer.CreateArtisticText 0, 0, CStr(max + 1) End Sub
  14. lev

    [CDR 2017-2023] Завершение редактирования текста

    Про завершение уже написали, теперь чуть ускоримся. 1. Даблкликаем текст на рисунке - инструмент выделения автоматом переходит в текстовый режим. 1. Как вариант, вместо "Щелкаю по кнопке "Текст" на панели инструментов." - пользуемся клавиатурным сокращением F8, и в этом режиме кликаем текст...
  15. lev

    [AI CC-CC2023] Наложение сложной текстуры

    Симметрия на головах скомпенсирована ассиметричным солнышком. А петли и хвосты уже как-то не очень. Но можно сказать, что тени - не тени, а рисунок на шкуре и почему бы ему не отзеркалится. Картинка вполне качественная, можно и не придираться. В общем сойдёт.
  16. lev

    [ID CC-CC2023] Разрядка пробелами)

    "Н.Б. Сонькин" из 9-го пункта не зацепится
  17. lev

    [CDR X4 и ранее] Слияние двух обьектов

    У яйца двойной контур, разъедините, покрасьте внутренний контур в белый и клипайте в него.
  18. lev

    [CDR 2017-2023] Corel Photo-paint - поменялся курсор ластика

    Переключите галку Tools > Options >Workspace > General > Shape cursor for brush tools (по-руски сами поищите)
  19. lev

    "Сладкая душа"

    Сладкая душа - буквы "д" разные, буквы "а" разные
  20. lev

    [CDR 2017-2023] Слияние цветов объекта

    Он не в стандартной поставке, его скачивать надо - LimitColors Macro Module