field evaluation

[gswifort]

How do I achieve this effect from PyRx? ZWCAD calculates the field value, without evaluation, correctly, but AutoCAD inserts ###

[CEXT-Dan]

The question is not clear to me in what you have tried, or how you are generating your field code. here’s a quick example using AcObjProp

import traceback
from pyrx import Ap, Db, Ed, Ge

def make_field(db: Db.Database, id: Db.ObjectId, pnt : Ge.Point3d):
    mtext = Db.MText()
    mtext.setLocation(pnt)
    model = Db.BlockTableRecord(db.modelSpaceId(), Db.OpenMode.kForWrite)
    model.appendAcDbEntity(mtext)
    expr = '%<\\AcObjProp Object(%<\\_ObjId {}>%).Length \\f "%lu6">%'.format(id.asOldId())
    field = Db.Field(expr, True)
    mtext.setField(field)

@Ap.Command()
def doit1():
    try:
        db = Db.curDb()
        ps, id, pnt = Ed.Editor.entSel("\nSelect: ", Db.Line.desc())
        if ps != Ed.PromptStatus.eOk:
            raise RuntimeError("oof")
        make_field(db,id,pnt)
        Db.Core.evaluateFields()
    except Exception:
        print(traceback.format_exc())

[gswifort]

This works as long as I have a single-variable field. For formulas containing multiple properties, AutoCAD displays ###.

My formula looks like this:

(
    %<\AcObjProp Object(4721938871432).Parameter(169).UpdatedDistance>%
    /
    %<\AcObjProp Object(4721938871672).TextString>%
)*-1
+
%<\AcObjProp Object(4721938871432).Parameter(117).UpdatedDistance>%
/
%<\AcObjProp Object(4721938871432).XScaleFactor>%
+0.0001-1

whitespace introduced for readability, not present in the formula

AutoCAD expects this:

%<\AcExpr ((%<\_FldPtr 4721947058784>%/%<\_FldPtr 4721947059168>%)*-1+%<\_FldPtr 4721947060320>%/%<\_FldPtr 4721947060704>%+0.0001-1) \f "%lu2%pr0">%

[CEXT-Dan]

this seems to work for AutoCAD.

def make_field(db: Db.Database, id: Db.ObjectId, pnt : Ge.Point3d):
    mtext = Db.MText()
    mtext.setLocation(pnt)
    model = Db.BlockTableRecord(db.modelSpaceId(), Db.OpenMode.kForWrite)
    model.appendAcDbEntity(mtext)
    expr1 = '%<\\AcObjProp Object(%<\\_ObjId {}>%).Length \\f "%lu6">%'.format(id.asOldId())
    expr2 = '%<\\AcExpr ({} *100)>%'.format(expr1)
    field = Db.Field(expr2)
    mtext.setField(field)

[gswifort]

I noticed two issues:

1. Your code works in ZWCAD and AUTOCAD, but if I run this command in ZWCAD, save the file, and open it in AUTOCAD, it displays ###

Open the attached drawing in ZWCAD, run DOIT1, save the drawing, and open it in AutoCAD.

2. ZWCAD has a problem with formatting in nested expressions.

The DOIT2 command retrieves the field code of the specified object and inserts a new object with the identical field code.
Field 1 contains the formatting for the entire expression, and Field 2 contains the formatting for the nested expression. Run DOIT2 and select Field 1, and the new field displays correctly. Run DOIT2 and select Field 2, and it displays ###.

from pyrx import Db, Ge, command
from pyrx.ed.prompt import entsel, get_point


@command
def doit1():
    db = Db.curDb()
    line_id = entsel("\nSelect a line: ")
    make_field(db, line_id, Ge.Point3d(0, 0, 0))
    Db.Core.evaluateFields()


def make_field(db: Db.Database, id: Db.ObjectId, pnt: Ge.Point3d):
    mtext = Db.MText()
    mtext.setLocation(pnt)
    model = Db.BlockTableRecord(db.modelSpaceId(), Db.OpenMode.kForWrite)
    model.appendAcDbEntity(mtext)
    expr1 = "%<\\AcObjProp Object(%<\\_ObjId {}>%).Length>%".format(id.asOldId())
    expr2 = "%<\\AcExpr ({}*100)>%".format(expr1)
    field = Db.Field(expr2)
    mtext.setField(field)


@command
def doit2():
    orig_text_id = entsel("\nSelect text with field: ")
    pnt = get_point("\nSpecify insertion point: ")
    orig_field_code = get_field_code(orig_text_id)
    make_field2(Db.curDb(), orig_field_code, pnt)
    Db.Core.evaluateFields()


def get_field_code(text_id: Db.ObjectId) -> str:
    ent = Db.Entity(text_id)
    field_id = ent.getField()
    field = Db.Field(field_id)
    flag = Db.FieldCodeFlag(Db.FieldCodeFlag.kFieldCode | Db.FieldCodeFlag.kAddMarkers)
    return field.getFieldCode(flag)


def make_field2(db: Db.Database, field_code: str, pnt: Ge.Point3d):
    mtext = Db.MText()
    mtext.setLocation(pnt)
    model = Db.BlockTableRecord(db.modelSpaceId(), Db.OpenMode.kForWrite)
    model.appendAcDbEntity(mtext)
    field = Db.Field(field_code)
    mtext.setField(field)

dwg.zip

[gswifort]

1. Your code works in ZWCAD and AUTOCAD, but if I run this command in ZWCAD, save the file, and open it in AUTOCAD, it displays ###

If after adding a field I edit it and click "Evaluate", the field will be displayed correctly in AUTOCAD

[CEXT-Dan]

It looks like I’m missing a function in AcDbField. An alternate method of creating nested fields is to use children.

Acad::ErrorStatus setFieldCode(
    const ACHAR* pszFieldCode, 
    AcDbField::FieldCodeFlag nFlag = (AcDbField::FieldCodeFlag) 0, 
    AcDbFieldArray* pChildFields = NULL
);

I'll add a wrapper for it

[CEXT-Dan]

I wrapped setFieldCode, but I don’t know how to use it. I asked in AutoCAD forums.