How to avoid AutoCAD to crash?

[D_D_K]

Hi,

I used this code on autocad2021 but autocad was crashing at the end of the code.
Looks like the problem is with Accarray.
how can i fix this? despite having met many times, but I still haven't really figured out!

[Alexander.Rivilis · Accepted solution]

Try this code instead:

//-----------------------------------------------------------------------------
//----- acrxEntryPoint.cpp
//-----------------------------------------------------------------------------
#include "StdAfx.h"
#include "resource.h"

//-----------------------------------------------------------------------------
#define szRDS _RXST("")

//-----------------------------------------------------------------------------
//----- ObjectARX EntryPoint
class COffsetPolylineApp : public AcRxArxApp {

public:
  COffsetPolylineApp() : AcRxArxApp() {}

  virtual AcRx::AppRetCode On_kInitAppMsg(void* pkt) {
    AcRx::AppRetCode retCode = AcRxArxApp::On_kInitAppMsg(pkt);
    return (retCode);
  }

  virtual AcRx::AppRetCode On_kUnloadAppMsg(void* pkt) {
    AcRx::AppRetCode retCode = AcRxArxApp::On_kUnloadAppMsg(pkt);
    return (retCode);
  }

  virtual void RegisterServerComponents() {  }

  static void RivilisOffsetPoly() 
  {
    ads_point p; ads_name en;
    static double distOffset = 1.0;
    if (acedEntSel(L"\nSelect Polyline: ", en, p) != RTNORM)
      return;
    AcDbObjectId idPoly;
    acdbGetObjectId(idPoly, en);
    if (!idPoly.objectClass()->isDerivedFrom(AcDbPolyline::desc()))
    {
      acutPrintf(L"\nIt is not a AcDbPolyline!");
      return;
    }
    AcGeMatrix3d mat; acedGetCurrentUCS(mat);

    AcDbObjectPointer<AcDbPolyline> pPoly(idPoly, AcDb::kForRead);
    AcGePoint3d pOnPline;
    pPoly->getClosestPointTo(asPnt3d(p).transformBy(mat), pOnPline);
    pOnPline.transformBy(mat.inverse());
    if (acedGetDist(asDblArray(pOnPline), L"\nOffset distance: ", &distOffset) == RTCAN)
        return;
    AcDbBlockTableRecordPointer pBtr(pPoly->ownerId(), AcDb::kForWrite);
    AcDbVoidPtrArray pArr;
    if (pPoly->getOffsetCurves(distOffset, pArr) == Acad::eOk)
    {
      for (int i = 0; i < pArr.length(); i++)
      {
        pBtr->appendAcDbEntity(reinterpret_cast<AcDbEntity *>(pArr[i]));
        reinterpret_cast<AcDbEntity*>(pArr[i])->close();
      }
    }
    pArr.setLogicalLength(0);
    if (pPoly->getOffsetCurves(-distOffset, pArr) == Acad::eOk)
    {
      for (int i = 0; i < pArr.length(); i++)
      {
        pBtr->appendAcDbEntity(reinterpret_cast<AcDbEntity*>(pArr[i]));
        reinterpret_cast<AcDbEntity*>(pArr[i])->close();
      }
    }
  }
};

//-----------------------------------------------------------------------------
IMPLEMENT_ARX_ENTRYPOINT(COffsetPolylineApp)

ACED_ARXCOMMAND_ENTRY_AUTO(COffsetPolylineApp, Rivilis, OffsetPoly, OffsetPoly, ACRX_CMD_MODAL, NULL)

[D_D_K]

Thanks expert for the both answers, my problem is solved! 

[1127204185]

How can we just shift outward

[Alexander.Rivilis]

---

@1127204185 wrote:

How can we just shift outward

---

Is it a question? You can calculate area of both polylines. Biggest area - outward shifted polyline.