получение коордиат

Question

такая ситуация : как получить координаты случайной точки, принадлежащей некоторому полигону, а то есть только стандартная ReturnCenter.
подскажите!

Answer 1

Случайной, хм... А что за нужда, именно случайной? Должна же быть функция проверки принадлежности полигону, по идее, генеришь себе случайность и проверяешь ее... Оптимизировать разброс небольшим радиусом. Но чтот я не понял, зачем это требуется, что-то тут нечисто в самой задаче. Серой попахивает :)))

Так в старину шурфы задавали где бить, подбросом кирки - куда мол бог пошлет.

Answer 2

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

Answer 3

Если полигон известен, то вот пример скрипта:

theView = av.getActiveDoc
GL = theView.GetGraphics
pol = GL.GetSelected.Get(0).GetShape
pline  = pol.AsPolyLine
for each i in 0..99
found=false
  while  (found.not)
  l = PolyLine.Make({{pline.Along (Number.MakeRandom(0,100)),pline.Along (Number.MakeRandom(0,100))}})
  pt = l.Along (Number.MakeRandom(0,100))
  'Если не включать границу
  found =(pol.Contains(pt)and(pline.Contains(pt).Not))
  'Если включать границу
  'found =(pol.Contains(pt))
  end
gp = GraphicShape.Make(pt)
GL.Add(gp)
end

Сгенерит 100 произвольных точек внутри выделенного графического полигона