void DemoRPilygons (HANDLE hLcWnd)
{
HANDLE hDrw, hBlock;
double X, Y, R, Ang;
// get drawing and block, linked with CAD window
hDrw = lcPropGetHandle( hLcWnd, LC_PROP_WND_DRW );
hBlock = lcPropGetHandle( hLcWnd, LC_PROP_WND_BLOCK );
X = 10.0;
Y = 20.0;
R = 10.0;
Ang = 90.0 * LC_DEG_TO_RAD;
lcPropPutInt( hDrw, LC_PROP_DRW_COLORT, RGB(0,100,200) );
lcBlockAddCircle( hBlock, X,Y, R, false );
lcPropPutInt( hDrw, LC_PROP_DRW_COLORT, RGB(255,150,0) );
lcPropPutInt( hDrw, LC_PROP_DRW_FCOLORT, RGB(20,50,80) );
lcBlockAddRPolygon( hBlock, 6, X,Y, R, Ang, false, false );
lcBlockAddRPolygon( hBlock, 3, X,Y, R, Ang, true, true );
lcBlockUpdate( hBlock, true, 0 );
lcWndZoomRect( hLcWnd, X-R-R, Y-R-R, X+R+R, Y+R+R );
}