如何方便快捷地用CAD画箭头.docx

怎样用CAD画箭头?总结了一下,大概有四种方法:方法一:用多义线先划直线段,后定义线宽起点宽度(如5),终点宽度(为0),长度为10(要大于起点宽度才好看).就行了,,然后用工具栏最下面的工具"分解",就把箭头分离出来了.(如果标注的箭头不对,就要先到标注样式管理器里先设置一下箭头的样式)方法二:一般而言,画直线箭头多用多段线(PL),先设定起点宽度为0,终点宽度为你需要的宽度即可,如1;接着点选两点即可画出一个箭头,两点间的距离为需要用到的箭头长度;然后将这个图形定义成块,在标注样式中选择箭头样式为自定义,找到刚才定义的图块即可,不过要注意方向,不然箭头变成向内了。也可以用直充的方法画箭头,定义方法类似。同时注意箭头的尺寸应以1个图形单位为标准单位,箭头大小在标注样式中更改即可。如果你只需用到一次,还可使用多段线,先设定起点宽度为0、终点为需要的宽度如1,接着画一个箭头,,紧接着点取最后一点,输入回车完成箭头绘制。方法三:在中CAD中直接画箭头的命令的一个方法!!!众所周知,在天正中可直接绘制箭头,而在AutoCAD中不得。最近我发现一个在命令行直接输入命令就可画出你想要的尺寸的箭头的方法,具体实施如下:1、首先拷贝下列lisp程序,用ar为名以记事本格式保存,,作为一个lisp程序文件;程序如下:(defunureal(bitkwdmsgdef/inp)(ifdef(setqmsg(strcat"\n"msg"<"(rtosdef)">:")bit(*2(fix(/bit2))))(if(=""(substrmsg(strlenmsg)1))(setqmsg(strcat"\n"(substrmsg1(1-(strlenmsg)))":"))(setqmsg(strcat"\n"msg":"))))(initgetbitkwd)(setqinp(getrealmsg))(ifinpinpdef))(defunupoint(bitkwdmsgdefbpt/inp)(ifdef(setqpts(strcat(rtos(cardef))","(rtos(cadrdef))(if(and(caddrdef)(=0(getvar"FLATLAND")))(strcat","(rtos(caddrdef)))""))msg(strcat"\n"msg"<"pts">:")bit(*2(fix(/bit2))))(if(=""(substrmsg(strlenmsg)1))(setqmsg(strcat"\n"(substrmsg1(1-(strlenmsg)))":"))(setqmsg(strcat"\n"msg":"))))(initgetbitkwd)(setqinp(ifbpt(getpointmsgbpt)(getpointmsg)))(ifinpinpdef))(setqcm(getvar"cmdecho"))(setvar"cmdecho"0)(defunC:AR(/#dwgscwvpt1pt2pt3)(if(=arsclnil)())(setq#dwgsc(getvar"DIMSCALE")W(ge