CAD 型钢断面绘制
[align=center]

|
-博客论坛-|-﨣﨤﨧﨨- -网站导航-|-规范下载- -BelovedFLash欣赏-
|
一本很不错的AutoCAD高级教程电子书 这个周末,在网上发现了一本好书,没有看到封面(没有找到前面的),姑且叫他 cad高级教程,里面的讲解很独到,值得研究一下。总共18章,文章 较大,暂且不共享给大家。 ![]() GetAsyncKeyState不只是监控键盘也监控鼠标的虚拟键 mouse_event 可以模拟按键,GetAsyncKeyState可以获得左右键的状态,再加上一个timer控件和GetCursorPos 就可以解决 vba中没有mouse相关事件了。 ![]() CAD VBA实现橡皮筋直线、圆 首先是计时控件,然后是实时捕捉鼠标的屏幕位置,然后是转换获得CAD当前试图鼠标所在的位置坐标,然后才是实时绘制直线或圆。 VBA中不可直接使用vb的timer控件,我们可以调用独立的xTimer控件。 ![]() VBA绘制窗线、墙线 [quote]'********************************************************************************************* '绘制窗线*************************************************绘制窗线****************************** ![]() vba加载lisp路径问题。 Function LoadLisp(LispFileName As String, Path as string) As String Dim temp As String, temp1 As String, temp2 As String, temp3 As String ![]()
|
Tiancao Blog All Rights Reserved 田草博客 版权所有 Copyright © |