首页 › Allegro Skill下载 › 改变Line的层面Change Line Layer

华尔兹的春天 发表于 2014-11-12 14:35:18

好东西希望有用

.vEフ_oo_侽生、 发表于 2014-11-12 20:31:55

ffggggggggggggggggggggg

sujuanyu888 发表于 2014-11-13 16:19:55

本帖最后由 sujuanyu888 于 2014-11-13 16:26 编辑

下下来试试看看哦:D

使用了，挺好用

mistletoe 发表于 2014-11-13 16:56:14

不错，感谢 分享！

lxianghui 发表于 2014-11-14 17:51:36

谢谢分享！

chuchiwolong 发表于 2014-11-17 10:28:40

vivienluo 发表于 2014-10-21 23:33
可以贴出来。。。

        case(lineDbid->objType
                ("path"
                        ; println("path")
                        ;endPoint = cadr(nthelem(lineDbid->nSegs lineDbid->segments)->startEnd)
                        ;startPoint = car(car(lineDbid->segments)->startEnd)
                        linePath = axlPathStart(list(car(car(lineDbid->segments)->startEnd)))
                        foreach(temp lineDbid->segments
                                case(temp->objType
                                        ("line"
                                                axlPathLine(linePath temp->width cadr(temp->startEnd))
                                                )
                                        ("arc"
                                                axlPathArcCenter(linePath temp->width cadr(temp->startEnd) temp->isClockwise temp->xy)
                                                )
                                        (t
                                                printf("Path Type is Unknown!\n")
                                                )
                                );end case                       
                        )
                        axlDBCreatePath(linePath lineLayer 'line)
                )
                ("text"
                        ; println("text")
                        Ori_XY=lineDbid->xy
                        Ori_textBlock=lineDbid->textBlock
                        Ori_rotation=lineDbid->rotation
                        Ori_isMirrored=lineDbid->isMirrored
                        Ori_justify=lineDbid->justify
                       
                        myorient = make_axlTextOrientation(?textBlock Ori_textBlock, ?rotation Ori_rotation, ?mirrored Ori_isMirrored, ?justify Ori_justify)
                       
                        newText= axlDBCreateText(lineDbid->text Ori_XYmyorient lineLayer nil)                       
                )
        )

墨客的秋天 发表于 2014-11-23 22:34:51

感谢分享，谢谢楼主，下下来看看

江小鱼 发表于 2014-12-28 00:21:09

学习学习，要是有源代码就好了

huangyao1220 发表于 2014-12-29 16:50:30

功能不错！

siseob 发表于 2014-12-30 08:54:07

感谢您分享的信息。

查看完整版本: 改变Line的层面Change Line Layer