[mig84]

Добрый день!
Возникла необходимость собрать dll которая строит точки, координаты которых хранятся в txt файле в заданном формате. Казалось бы - все просто. Координаты записаны в arraylist'ы, осталось только в базу чертежа их поместить. Пытаюсь выполнить:

Код:

[Выделить все]

Dim db As Database = HostApplicationServices.WorkingDatabase
Using trans As Transaction = db.TransactionManager.StartTransaction
Dim bt As BlockTable = trans.GetObject(db.BlockTableId, OpenMode.ForRead)
Dim btr As BlockTableRecord
btr = trans.GetObject(bt(BlockTableRecord.ModelSpace), OpenMode.ForWrite)
            For i = 0 To x1_array.Count - 1
                Dim point1 As Point3d = New Point3d(x1_array(i), y1_array(i), 0)
                Dim point2 As Point3d = New Point3d(x2_array(i), y2_array(i), 0)
                Dim pnt1 As DBPoint = New DBPoint(point1)
                Dim pnt2 As DBPoint = New DBPoint(point2)
                pnt1.SetDatabaseDefaults()
                pnt2.SetDatabaseDefaults()
                btr.AppendEntity(pnt1)
                btr.AppendEntity(pnt2)
                trans.AddNewlyCreatedDBObject(pnt1, True)
                trans.AddNewlyCreatedDBObject(pnt2, True)
            Next

            db.Pdmode = 3
            db.Pdsize = 2
            trans.Commit()
        End Using

Но возникает фатальная ошибка. Причем возникает где-то после 20-й итерации. Уже час не могу понять в чем проблема.
Может дело в каком-то ограничении на транзакцию?

[hwd]

тынц.

[mig84]

Сообщение от hwd тынц.

спасибо. уже читал это. просто интересно, почему мой первый вариант оказался не рабочим. точнее рабочим, но только с условием малого числа точек (<20)


Ошибка оказалась глупейшая. Дело было в размерности второго arrayList'а