void DemoShapePlines (HANDLE hLcWnd)
{
  HANDLE hBlock, hPline, hShape;

  // get a block, linked with CAD window
  hBlock = lcPropGetHandle( hLcWnd, LC_PROP_WND_BLOCK );
  // begin Shape entity
  lcBlockBeginShape( hBlock );
  // 1st polyline
  hPline = lcBlockAddPolyline( hBlock, 0, true, false );
  lcPlineAddVer( hPline, 0, 10, 10 );
  lcPlineAddVer( hPline, 0, 10, 90 );
  lcPlineAddVer( hPline, 0, 90, 90 );
  lcPlineAddVer( hPline, 0, 90, 10 );
  lcPlineEnd( hPline );
  // 2nd polyline
  hPline = lcBlockAddPolyline( hBlock, 0, true, false );
  lcPlineAddVer( hPline, 0, 20, 20 );
  lcPlineAddVer( hPline, 0, 20, 80 );
  lcPlineAddVer( hPline, 0, 80, 20 );
  lcPlineEnd( hPline );
  // 3rd polyline
  hPline = lcBlockAddPolyline( hBlock, 0, true, false );
  lcPlineAddVer( hPline, 0, 50, 80 );
  lcPlineAddVer( hPline, 0, 80, 80 );
  lcPlineAddVer( hPline, 0, 80, 60 );
  lcPlineAddVer( hPline, 0, 50, 60 );
  lcPlineEnd( hPline );
  // add Shape entity
  hShape = lcBlockAddShape( hBlock );
  // set solid filling
  lcPropPutBool( hShape, LC_PROP_ENT_SOLIDFILL, true );
  lcPropPutStr( hShape, LC_PROP_ENT_FCOLOR, L"0,255,255" );
  // update view
  lcBlockUpdate( hBlock, false, 0 );
  lcWndExeCommand( hLcWnd, LC_CMD_ZOOM_EXT, 0 );
}