gxnnmy27 发表于 2006-3-31 00:29:00

在CAD中如何斜着选取图元

<P>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 在CAD中,建立UCS可以斜着画图,可怎么斜着选图元呢?用VBA又是如何实现斜选图元????<?xml:namespace prefix = v ns = "urn:schemas-microsoft-com:vml" /><v:shapetype id=_x0000_t75 stroked="f" filled="f" path="m@4@5l@4@11@9@11@9@5xe" o:preferrelative="t" o:spt="75" coordsize="21600,21600"> <v:stroke joinstyle="miter"></v:stroke><v:formulas><v:f eqn="if lineDrawn pixelLineWidth 0"></v:f><v:f eqn="sum @0 1 0"></v:f><v:f eqn="sum 0 0 @1"></v:f><v:f eqn="prod @2 1 2"></v:f><v:f eqn="prod @3 21600 pixelWidth"></v:f><v:f eqn="prod @3 21600 pixelHeight"></v:f><v:f eqn="sum @0 0 1"></v:f><v:f eqn="prod @6 1 2"></v:f><v:f eqn="prod @7 21600 pixelWidth"></v:f><v:f eqn="sum @8 21600 0"></v:f><v:f eqn="prod @7 21600 pixelHeight"></v:f><v:f eqn="sum @10 21600 0"></v:f></v:formulas><v:path o:connecttype="rect" gradientshapeok="t" o:extrusionok="f"></v:path><?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:lock aspectratio="t" v:ext="edit"></o:lock></v:shapetype><v:shape id=_x0000_i1025 style="WIDTH: 279pt; HEIGHT: 163.5pt" o:ole="" type="#_x0000_t75"><v:imagedata cropright="11495f" cropleft="9955f" cropbottom="12941f" croptop="14610f" o:title="" src="file:///C:/DOCUME~1/LC/LOCALS~1/Temp/msoclip1/02/clip_image001.wmz"></v:imagedata></v:shape></P>

gxnnmy27 发表于 2006-3-31 00:38:00

<?xml:namespace prefix = v ns = "urn:schemas-microsoft-com:vml" /><v:shapetype id=_x0000_t75 stroked="f" filled="f" path="m@4@5l@4@11@9@11@9@5xe" o:preferrelative="t" o:spt="75" coordsize="21600,21600">&nbsp;而且以A和B为轴建立UCS坐标,,和原来的真实坐标又不对,本人想用程序(VBA)斜选AB、BE为轴的50米宽的图元,盼高手指教。</v:shapetype>

雪山飞狐_lzh 发表于 2006-3-31 12:55:00

http://www.mjtd.com/object/acad2004/idh_selectbypolygon.htm
页: [1]
查看完整版本: 在CAD中如何斜着选取图元