That's why I suggested GIS activex that knows trigonometry well:)
Cetin

>Io lo so che sei un mostro !!!!!
>Il fatto è che sono 20 anni che non tocco più le funzioni trigonometriche
>e mi ero rassegnato a ristudiarmele. Grazie di cuore !
>
>>>I need to place a certain number of shapes inside a circular sector,
>>>to be clear : I need to figure the sits inside a circular theatre, I thought about the new syntax involving the poypoint and rotation property but I
>>>didn' find that much in the VFP Help.
>>>has anybody tested something similar ?
>>>Thx
>>>Alessio
>>
>>Gioca con questo:
>>

>>PUBLIC oform1
>>
>>oform1=NEWOBJECT("form1")
>>oform1.Show
>>RETURN
>>
>>DEFINE CLASS form1 AS form
>>
>>
>>	desktop = .t.
>>	autocenter = .t.
>>	Height = 581
>>	Width = 765
>>	DoCreate = .T.
>>	Caption = "Form1"
>>	Name = "Form1"
>>
>>
>>	PROCEDURE Init
>>		#define numero 20
>>
>>		this.AddProperty([posti(numero)],null)
>>
>>		stepAngle = 2*PI()/numero
>>		XCenter   = (this.width-60)/2
>>		YCenter	  = (this.height-60)/2
>>		radius	  = 200
>>		FOR k=1 TO numero
>>			this.AddObject("posti["+LTRIM(STR(m.k))+"]","Posto")
>>			WITH this.Controls[m.k]
>>
>>				.Fillcolor = MOD(m.k,2)*255
>>				
>>				.Rotation = RTOD(stepAngle*m.k)
>>
>>				.Move(m.XCenter - m.radius*COS(m.stepAngle*m.k);
>>                                     ,m.YCenter + m.radius*SIN(m.stepAngle*m.k))
>>				
>>				.visible = .t.
>>			ENDWITH
>>		NEXT
>>
>>	ENDPROC
>>
>>
>>ENDDEFINE
>>
>>DEFINE CLASS Posto AS Shape
>>	* is need a square
>>	heighT     = 60
>>	width	   = 60
>> 	backstyle  = 0
>>	FillStyle  = 0
>>	
>>	DIMENSION aPoints(4,2)
>>	aPoints			= 30
>>	aPoints[2,1]	= 70
>>	aPoints[3,1]	= 70
>>	aPoints[3,2]	= 70
>>	aPoints[4,2]	= 70
>>	PolyPoints	= "this.aPoints"
>>	
>>ENDDEFINE
>>