Рисование полилинии, аналогично данной, на заданном расстоян

[Сергей1988]

Доброго всем времени суток
На основе имеющихся точек я создаю полилинию.

Код: Выделить всё

Create Pline Into Variable myobj1 0
Create Pline Into Variable myobj 0

For i=1 to TableInfo(sSel1,TAB_INFO_NROWS)
Fetch First From sSel1
  While not EOT(sSel1)
 	 Alter Object myobj Node Add (aCoordX,aCoordY) это создается линия по тек. точкам
	 Alter Object myobj1 Node Add (aNewCoordX,aCoordY)
	 i=i+1  
 	Fetch Next From sSel1 
  Wend
  Next
Insert Into sSel (obj) Values (myobj)
Insert Into sSel (obj) Values (myobj1)

А myobj1 создается по координатам (aNewCoordX=ObjectGeography(obj, OBJ_GEO_POINTX)+ Abs(Поле1- Val(sBeetwin)),aCoordY) т.е. просчитывается.
Но имеющаяся полилиния меняется же не только по оси х, но и по у. Как можно автоматически предусмотреть, чтобы все зависимости какой вид имела полилиния..рисовалась полилиния, аналогично данной на заданном конкретном расстоянии Abs(Поле1- Val(sBeetwin))
Если кто сталкивался с такой проблемой, подскажите пожалуйста

[Boris]

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

[Mavka]

Ему типа буфер нужен, односторонний

[asgs]

Ничонипонял.
Расстояние, это конечно хорошо. Неплохо бы еще вспомнить понятие "вектор", с длиной, равной этому самому "расстоянию" и получить через этот вектор те самые смещения dX и dY, которые нужно прибавить к aCoordX и aCoordY, без всяких Abs.