Create ArrowLine

Hi.

I have problems to set properties by creating an arrow!

I create my Arrowline as listed below:

ViewClass:

void XDVView::OnArrowLine()
{
 m_drawshape = FO_COMP_ARROWLINE;
 SetCurrentDrawingCursor(IDC_FO_DRAWLINE_CURSOR);
 m_action_state = State_DrawLine;;
 m_bUpRightMode = FALSE;
}

MyDataModalClass:

void CMyExtDataModel::AddLineShape(UINT m_drawshape,LPPOINT pptPoints, int nCount,BOOL bArrow)
{
 switch(m_drawshape)
 {
 case FO_COMP_LINE:
  {
   CString strCaption;
   CString strName;
   strCaption = _T("");
   strName = _T("");
  
   CFOLineShape *pReturn = new CFOLineShape;
   pReturn->AddRef();
   pReturn->Create(pptPoints,nCount);
   pReturn->UpdatePosition();
   strCaption = GetUniqueCaption(m_drawshape);
   strName = GetUniqueName(m_drawshape);
   pReturn->SetObjectCaption(strCaption);
   pReturn->SetObjectName(strName);
   pReturn->SetLineWidth(4);
   pReturn->SetLineColor(RGB(0,255,0));
   if(bArrow)
   {
    pReturn->SetEndArrowType(5);
    pReturn->SetEndArrowWidth(5);
    pReturn->SetEndArrowLength(5);
   } 
   InsertShape(pReturn);
   pReturn->Release();
   pReturn=NULL;
   SetModifiedFlag(TRUE);
   break;
  }
 default:
  {
   CFODataModel::AddLineShape(m_drawshape,pptPoints,nCount,bArr ow);
  }
 }
}

It looks like this:

Can anybody help me? What's wrong?