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

  1. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    Фактически, (X,Y) работает как координата нижнего левого угла. Так же, как написано в справке Фактически, (X,Y) работает как координата нижнего левого угла. В справке написано - верхнего левого угла. Можно предположить, что и здесь (X,Y) работает как координата нижнего левого угла (что...
  2. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    А кому "давно был известен" вот этот баг ? И что значит, "присущий конкретно вашей версии Корела" ? Русскоязычная X3 - это не "моя конкретная версия", а версия многих пользователей Корела. Вы уж определитесь... Если вы хотели сказать, что не той версии, что у вас, то это уже мания величия... Вы...
  3. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    По-моему, ваша философия совсем не в тему. Какое это имеет отношение к непониманию вами того, каким образом из наблюдения "По давним опытам помнится, что IsOnShape зависит от режима просмотра, т.е. может выдавать неверный результат при запуске в режиме WireframeView и правильно работать в...
  4. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    Если под "всё дальнейшее обсуждение" вы понимаете ту часть ветки, что после моего предложения "На всякий случай на время работы метода IsOnShape дополнительно к масштабу добавлю перевод в расширенный режим", то это предложение было написано в ответ на вот эту цитату (читаем внимательно): Т.е...
  5. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    Похоже, у вас каша в голове. При чём здесь аналогия ? При чём здесь "баг конкретно вашей локализации" (то бишь SelectShapesFromRectangle) ? Лев прямо пишет, что IsOnShape не всегда работает корректно в режиме каркаса. Поэтому, я и добавил перевод в расширенный на время выполнения этого метода...
  6. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    А в случае с SelectShapesFromRectangle наоборот - некорректно работает в расширенном. P.S. На всякий случай на время работы метода IsOnShape дополнительно к масштабу добавлю перевод в расширенный режим
  7. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    Что не зависит от маштаба ? Т.е. корректно работает при любых масштабах ? У себя проверил (X3) - артефакт проявляется при любых масштабах отображения. Помогает только режим каркаса.
  8. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    В X9 работает корректно У меня русскоязычная версия X3 SP2 (13.0.0.739). Лицензия. У вас, насколько я понимаю, англоязычная (и возможно, пиратская). Режим отображения: "Расширенный с наложениями" --- Как оказалось, проблема устраняется переводом режима отображения в "каркас" или "упрощённый...
  9. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    Да, здесь от левого верхнего. Но обычно наоборот - от нижнего левого угла. Ладно, изменим процедуру: Sub test() ActivePage.SelectShapesFromRectangle ActiveShape.LeftX, ActiveShape.TopY, ActiveShape.RightX, ActiveShape.BottomY, True End Sub Результат тот же самый. При выделении красного...
  10. Cyrax

    [CDR X4 и ранее] Получить Shape, расположенный под/над другим Shape (без перебора)

    Вот файл X3 с двумя пересекающимися прямыми - красной и синей Если выделить красную прямую, то метод ActivePage.SelectShapesFromRectangle() с параметром (Touch = True) синий прямоугольник не находит (не выделяет). Если выделить синий, то красный находит (выделяет): Sub test()...
  11. Cyrax

    Артефакт с SelectObjectsInRect - Артефакт с SelectObjectsInRect

    С прямыми SelectObjectsInRect не всегда работает корректно
  12. Cyrax

    [CDR X4 и ранее] Преобразование объекта (замкнутой кривой с заливкой) в абрис

    В X6... Угадал ? В X3 убрали... уже... (Растровые изображения - Трассировка по центральной линии) (PowerTrace - Настройка- Тип трассировки = Центральная линия)
  13. Cyrax

    [CDR X4 и ранее] Преобразование объекта (замкнутой кривой с заливкой) в абрис

    Есть операция преобразования абриса в объект. Задача заключается в обратном преобразовании объекта в абрис. На входе - замкнутые кривые, некоторые из которых по форме идентичны или почти идентичны толстой изогнутой линии. Вот такие кривые нужно преобразовать в абрис. Кривые, не похожие на линию...
  14. Cyrax

    [CDR X4 и ранее] Артефакт с замыканием кривой

    Другой (программный) способ устранения сабжевого артефакта, не имеющий побочных эффектов: shape.Curve.Closed = False 'размыкание кривой с одновременным устранением артефакта (кривая становится корректно разомкнутой) shape.Curve.Closed = True 'корректное замыкание кривой Процедура, которая...
  15. Cyrax

    [CDR X4 и ранее] Артефакт с замыканием кривой

    Тот факт, что при выполнении этого самого Wend кривая оказывается разомкнутой (и уже без артефакта), можно сделать вывод, что некорректным является не отсутствие замыкающего сегмента, а значение свойства [Closed = True], которое исправляется в значение [False] (Здесь не совсем понятно, почему...
  16. Cyrax

    [CDR X4 и ранее] Артефакт Shape.IsOnShape: результат зависит от масштаба отображения

    Финализируем сабж. Корректно работающий (не зависящий от масштаба отображения) IsOnShape: Function IsOnShape(shape As shape, ByVal X As Double, ByVal Y As Double, Optional ByVal HotArea As Double = -1) As cdrPositionOfPointOverShape Dim settPs As Boolean: settPs =...
  17. Cyrax

    [CDR X4 и ранее] Артефакт с замыканием кривой

    В прошлом году ради интереса пробовал открыть свой файл в новом Corel 2017 - там почти все ромбы превратились в треугольники. Разбираться не стал. Сейчас понятно, в чём дело. Эти ромбы - незамкнуты (одно из рёбер визуализируется за счёт заливки) и с тем же самым артефактом, что в сабже...
  18. Cyrax

    [CDR X4 и ранее] Артефакт с замыканием кривой

    Мало ли что там на уровне свойств у артефактной кривой творится. На уровне интерфейса кривая ведёт себя как разомкнутая и наличие у неё при этом 3 сегментов вполне соответствует этому поведению. Здесь скорее, свойство "Closed" имеет некорректное значение, не соответствующее поведению кривой на...