Error when void shape?????????

 you cannot void unfilled shapes nor shapes on the keepin and keepout classes

You can't void an existing shape like that. To perform that task you should:

1/ Extract the polygon of the existing shape (Use axlPolyFromDB).

2/ Create a new open shape from that polygon

3/ Create your void

4/ Create the closed shape

5/ Delete the original shape if all the above steps are successful.

Dave

 Tks, Dave

You are good man

Elek

 By the way, I want to create a shape with void by text using axlText2Lines as following code:

 foreach(text AllTextsInDesign

            lines = axlText2Lines(text)

            ; flatten list

            flattened = foreach(mapcan x lines x)

            text_bBox = text->bBox

            ;enlarge bBox

            shape_box = list(axlMXYSub(car(text_bBox), add_shape_value) axlMXYAdd(lastelem(text_bBox), add_shape_value))

            create_shape = axlDBCreateRectangle(shape_box, t, layer_check, nil , nil)

            shape_ID = car(create_shape)

            foreach(path flattened

                        ; may return multiple polys

                        polys = axlPolyFromDB(path ?endCapType 'ROUND ?line2poly t)

                        ; create shapes in database

                        foreach(poly polys

                                    axlDBCreateVoid(shape_ID poly)

                                    ;shape_void = axlDBCreateShape(poly t layer_check nil nil)

                        );end foreach

            );end foreach

);end foreach

 And the result is nothing happens(no voids created), please tell me how to repair code.(My allegro = 16.6)

 Thanks.

Luan

Hi Luan,

You  can only add voids to open shapes.

Try this:

  foreach(text, textObjs

lines = axlText2Lines(text)

; flatten list

flattened = foreach(mapcan x lines x)

text_bBox = text ->bBox

;enlarge bBox:

ll = axlMXYSub(car(text_bBox), add_shape_value); Lower left corner

ur = axlMXYAdd(lastelem(text_bBox), add_shape_value); Upper right corner

ul = list(car(ll), cadr(ur)); Upper left corner

lr = list(car(ur), cadr(ll)); Lower right corner

shapePath = axlPathStart(list(ll, ul, ur, lr, ll)); Create a rectangular path.

oShape = axlDBCreateOpenShape(shapePath, t, layer_check); Create an open shape ready to add voids.

when(oShape

foreach(path, flattened

foreach(poly, axlPolyFromDB(path ?endCapType 'ROUND ?line2poly t)

axlDBCreateVoid(oShape, poly); create voids in open shape

);end foreach

);end foreach

when(car(parseString(layer_check, "/")) == "ETCH", axlDBCreateCloseShape(oShape)); This is only needed for shapes on an etch layer

)

);endforeach