Delphi

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Delphi TXMLDocument - маскировка символов Моя прога обрабатывает файл sitemap.xml. По спецификации некоторые символы, а именно: амперсанд (&), угловые скобки(<,>), апостроф(') и двойные кавычки(") в URL должны маскироваться. Проблема в следующем: Для обработки использую TXMLDocument, DOMVendor - MSXML. Амперсанд и угловые скобки при добавлении URL маскируются автоматически, а вот апостроф и кавычки - нет. Если маскировать их вручную,... https://www.cyberforum.ru/ delphi/ thread2255516.html	Delphi Закладки как отдельные кнопки панели задач Всем добрый день. Есть задача сделать так чтобы закладки например от pagecontrol отображались в панеле задач windows как отдельные кнопки. Пробовал 2 варианта: 1. Сделал дочерние окна, которые отображаются как отдельные кнопки в панеле задач с помощью (Params.WndParent:=GetDesktopWindow). Как только я эти окна засовываю в pagecontrol основного окна (Form01.ManualDock(PageControl1)) кнопки в...
Delphi Model maker code explorer (MMX) - теперь бесплатный https://www.cyberforum.ru/ delphi/ thread2248575.html подробности на здесь и здесь	Delphi Исходники программы дли Вики Принт 57 (Viki Print 57) на Delphi 7 https://www.cyberforum.ru/ delphi/ thread2248281.html Добрый день! Написал на Delphi 7 программу для обращения с фискальным регистратором Вики принт 57 ( Viki Print 57 ). Принцип работы посылки команд, как в утилите Fito. Данные для ОФД передаются. Если кому интересно взглянуть на исходники (могу всё и объяснить) - пишите
Delphi Изменить цвет заголовка окна в Windows 10 Как корректно изменить цвет заголовка окна (фон, текст, кнопки) для Windows 10, приложение Win32 на Delphi ? Пишем темную тему интерфейса и белый цвет caption'а не вписывается в дизайн.	Delphi ECDSA (secp256k1): написать функцию, получения публичного ключа из приватного https://www.cyberforum.ru/ delphi/ thread2246439.html Здравствуйте Уважаемые Форумчане! Не как не могу написать функцию, получения публичного ключа из приватного. Много примеров есть в других языках программирования, но я в них не особо разбираюсь. Спасибо за любую помощь!
Delphi Сортировка данных типа Variant в Rad Studio Berlin 10.1 https://www.cyberforum.ru/ delphi/ thread2245199.html Всем хай! Сходу к делу! Есть КОНСОЛЬНОЕ приложение в ДЕЛЬФИ 7, в котором сортируется динамический одномерный массив типа данных variant: type TVector = array of variant; // сортировка вставками procedure InsertSort(pv: TVector); var i, j: word;	Delphi PopupMenu - первый пункт 78 символов Всем привет. Добавляем PopupMenu, создаём несколько пунктов. Пусть 2. И пусть оба будут содержать одинаковый текст: 1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890 (100 символов). Запускаем. Открываем PopupMenu, видим, что первый пункт обрезался до 78 символов. Что за глюк такой? И что можно с ним сделать? Кроме как добавить разделитель в...
Delphi ToolsAPi, TPropertyEditor https://www.cyberforum.ru/ delphi/ thread2243649.html Привет всем, решил я тут для себя открыть редакторы свойств и начал собственно играться. Перечитал кучку инфы и начал понимать что есть что, но вот завтрял я на одной штуке: есть вот такой класс TTestEditor = class(TPropertyEditor) private // public function GetAttributes: TPropertyAttributes; override; procedure SetValue(const Value: WideString); override; ...	Delphi Как из Delphi активировать макросы в MS Word? Доброе время суток. Вопрос у меня довольно сложный, он затрагивает не только среду разработки Delphi, но и MS Word. Не секрет, что макросы в Word, по умолчанию, отключены. В связи с чем, я бы хотел знать, а как их активировать из приложения Delphi? https://www.cyberforum.ru/ delphi/ thread2242232.html
Delphi Как из DLL сгенерировать EXE? Я читала, что dll-библиотеки, могут сами генерировать exeшники и подключаться к ним. Никто не знает, как это сделать в Delphi? Заранее благодарна.	Delphi Создание ключа подписи Всем доброго времени суток. Подскажите пож. какую нибудь литературу или может кто то реализовывал создание ключа подписи документов в БД. В общем задача такая: подписать входящий документ ключом директора. Спасибо. https://www.cyberforum.ru/ delphi/ thread2241416.html

snake32

3303 / 1490 / 235

Регистрация: 26.02.2009

Сообщений: 7,590

Записей в блоге: 5

07.06.2018, 01:12

Определение принадлежности точки к многоугольнику - Delphi - Ответ 12456724

07.06.2018, 01:12. Показов 5258. Ответов 1

Метки (Все метки)

Сообщение было отмечено shotic996 как решение

Решение

Сообщение от shotic996

Если есть способы легче

Из точки А пускаете луч и ищите кол-во пересечений луча с отрезками полигона.
Если кол-во пересечений не чётно то точка внутри полигона.

Удобнее пускать луч по Х координате вправо:

Delphi

function GetRayX( const rayY:integer; const p0,p1:TIVec2 ):single;
begin
  Result := ( rayY - p0.y )*( p1.x - p0.x )/( p1.y - p0.y ) + p0.x;
end;
 
procedure NumIntersect( var num:integer; const pt:TIVec2; const poly:TArray<TIVec2> );
    var i:integer;
begin
  for i:=0 to Length(poly)-2 do
    if(( poly[i].y > pt.y )<>( poly[i+1].y > pt.y ))and( pt.x < GetRayX(pt.y, poly[i], poly[i+1]) )then
      Inc(num);
end;
// полигон poly должен быть "замкнутым" - первая точка должна совпадать с последней
function InsidePoly( const pt:TIVec2; const poly:TArray<TIVec2> ):Boolean;
  var num:integer;
begin
  num := 0;
  NumIntersect( num, pt, poly );
  Result := odd(num);
end;

Вернуться к обсуждению:
Определение принадлежности точки к многоугольнику Delphi

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

07.06.2018, 01:12

Готовые ответы и решения:

Определение принадлежности точки многоугольнику
Объясните что такое метод суммирования углов. Или просто Метод углов

Задача о принадлежности точки многоугольнику
помогите понять как реализовать метод суммирования углов.

Программа о принадлежности точки выпуклому многоугольнику
Всем привет! Кому не трудно, объясните пожалуйста следующую программу- принадлежит ли точка...

Разработать программу, которая решает задачу принадлежности точки многоугольнику с помощью метода "Учет числа оборотов"
Здравствуйте, мне необходимо разработать программу которая решает задачу принадлежности точки...

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

07.06.2018, 01:12

Помогаю со студенческими работами здесь

Определение принадлежности точки
Помогите пожалуста :cry: Написать программу которая определяет принадлежит ли точка с координатами...

Определение принадлежности точки фигуре
Всем привет. Есть задача определения принадлежности точки фигуре. Как думаете, нормальный...

Определение принадлежности точки к области
Надо определить принадлежность точки к заданной области. Рисунок прикрепил. Вот код который...

Определение принадлежности точки треугольнику
Написать программу определения принадлежности точки треугольника

Наверх