var ctrlman = m_Map.GetCtrlMan();
var util = m_Map.GetUtility();
var imageman = ctrlman.GetImageMan();
var poiman = ctrlman.GetPOIMan();

//중심좌표 구하기
var controlstate = ctrlman.GetControlState();
var posLL = controlstate.GetLLCenter();

//이미지 생성
imageman.SetDefaultPath("http://www.talmap.co.kr/tutorial/");
var poiImage =  imageman.LoadImageList("POIIMAGE", "image/CAR.png", 64,64);

//step1. POI group 생성
var group = poiman.FindGroup(1);
if(!group)
{ 
	group = poiman.NewGroup(1);
}

//step2. Style 생성
var style = poiman.FindStyle(1);
if(!style)
{
	style = poiman.NewStyle(1);
	style.SetGDIFont("굴림", 0, 8);
	style.SetFontColor(util.RGBColor(255, 0, 0));
	style.SetFontOutColor(util.RGBColor(255, 0, 0));
	style.SetBrush(util.RGBAColor(100, 0, 255, 50),util.GetConstToValue("BS_SOLID"));
	style.SetPen(util.RGBColor(0, 0, 0),1,util.GetConstToValue("PS_SOLID"));
	//0~3레벨까지만 이미지를 지정합니다.
	style.SetImage( 0, poiImage);
	style.SetImage( 1, poiImage);
	style.SetImage( 2, poiImage);
	style.SetImage( 3, poiImage);
}

//step3. POI Group Style 적용
group.SetStyle(style);

//step4. POI Item 생성
var item = group.NewItem(1);
item.SetLonLat(posLL.GetX(), posLL.GetY());
item.SetShowImage(1);
item.SetTextStyle(util.GetConstToValue("DRAWTEXT_STYLE_BOARDOUTLINE"));
item.SetCaption("POI Test");
item.SetAnimation(200);
item.SetImageOffset(0);
item.SetAlpha(100);
item.SetAngle(30);
item.SetScale(50);//이미지를 축소합니다.

#include "CXCtrlMan.h"
#include "CXLyaerMan.h"
#include "CXUtility.h"

void CSampleDlg::OnSmDrawPolygon()
{
	CXLayerMan layerman = ctrlman.GetLayerMan();
	CXUtility util = m_Map.GetUtility();

	// Make Layer Style
	CXLayerStyle style = layerman.NewStyle(-1);
	style.SetPen(util.RGBColor(255, 0, 0), 1, util.GetConstToValue(_T("PS_SOLID")));
	// Brush 색상 및 투명도 설정
	style.SetBrush(util.RGBAColor(0, 0, 255, 100), util.GetConstToValue(_T("BS_SOLID")));

	// Make Laeyr Polygon
	CXLayer layer = layerman.FindLayer(1);
	if (!layer) {
		layer = layerman.NewLayer(1);
	}

	CXLayerPolygon polygon = layer.NewPolygon(-1);
	polygon.BeginUpdate();
	polygon.SetClosed(1); // 0: PolyLine, 1: Polygone
	polygon.SetStyle(style);
	polygon.EndUpdate();
	polygon.SetStateModeNew();
}                     

/// <summary>
/// 지도 폴리곤 그리기
/// </summary>
private void Map_Polygon()
{
    CtrlMan.GetUIMan().SetMessage("오른쪽 마우스를 클릭하면 종료 됩니다", 5000);

    TalMapXLib.IXLayerMan LayerMan;
    TalMapXLib.IXLayer layer;
    TalMapXLib.IXLayerPolygon layerobj;
    TalMapXLib.IXLayerStyle style;

    LayerMan = CtrlMan.GetLayerMan();
    style = LayerMan.FindStyle(nPolyStyle); // Style 적용
    if (style == null)
    {
        style = LayerMan.NewStyle(nPolyStyle);
        style.SetPen(m_Map.GetUtility().RGBColor(255, 0, 0), 1, m_Map.GetUtility().GetConstToValue("PS_SOLID"));
        style.SetBrush(m_Map.GetUtility().RGBAColor(0, 255, 255, 100), m_Map.GetUtility().GetConstToValue("BS_SOLID"));
    }
    layer = LayerMan.FindLayer(nLayerID);
    if (layer == null) layer = LayerMan.NewLayer(nLayerID);

    layerobj = layer.NewPolygon(-1); // ID 값을 -1 로 부여하면 자동아이디 부여
    layerobj.BeginUpdate();
    layerobj.SetClosed(1);   // 0:PolyLine, 1: PolyGon
    layerobj.SetCanFocus(1);
    layerobj.SetCanClick(1);
    layerobj.SetStyle(style);
    layerobj.EndUpdate();
    layerobj.SetStateModeNew();
}

'//-----------------------------------------------------------------------------
'// 지도 폴리곤 그리기
'//-----------------------------------------------------------------------------
Private Sub Map_Polygon()
    Call ctrlman.GetUIMan.SetMessage("오른쪽 마우스를 클릭하면 종료 됩니다.", 5000)

    Dim LayerMan As TalMapXLib.IXLayerMan
    Dim layer As TalMapXLib.IXLayer
    Dim layerobj As TalMapXLib.IXLayerPolygon
    Dim style As TalMapXLib.IXLayerStyle

    Set LayerMan = ctrlman.GetLayerMan
    style = LayerMan.FindStyle(nPolyStyle) '// Style 지정
    If style Is Nothing Then
        style = LayerMan.NewStyle(nPolyStyle)
        Call style.SetPen(m_Map.GetUtility.RGBColor(255, 0, 0), 1, m_Map.GetUtility.GetConstToValue("PS_SOLID"))
        Call style.SetBrush(m_Map.GetUtility.RGBAColor(0, 255, 255, 100), m_Map.GetUtility.GetConstToValue("BS_SOLID"))
    End If
    Set layer = LayerMan.FindLayer(nLayerID)
    If layer Is Nothing Then
        Set layer = LayerMan.NewLayer(nLayerID)
    End If

    layerobj = layer.NewPolygon(-1) '// ID 값을 -1 로 부여하면 자동아이디 부여
    With layerobj
        .BeginUpdate
        .SetClosed (1)  '// 0:PolyLine, 1: PolyGon
        .SetCanFocus (1)
        .SetCanClick (1)
        .SetStyle (style)
        .EndUpdate
        .SetStateModeNew
    End With
End Sub