马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
×
使用“进程监控”技术,防止ACAD长循环过程中“假死” (普通的打印显示进度语句不反应)情况。
一、状态栏进度条
![](source/plugin/imc_colorcode/images/loading.gif) - (defun C:PROGRESS1 ( / )
- (xdrx_ui_prgbar "Command PROGRESS1:" 1000 0.5)
- (repeat 1000
- (xdrx_ui_prgbar T)
- (xdrx_mdelay 10)
- )
- (xdrx_ui_prgbar)
- (princ)
- )
二、命令行文字进度条
![](source/plugin/imc_colorcode/images/loading.gif) - ;;------------------------------------------------
- ;; Cammand line xdrx_ui_prgbar
- ;;------------------------------------------------
- (defun C:PROGRESS2 ( / )
- (xdrx_ui_prgcmdbar "\nCommand PROGRESS2: " 1000 0.5)
- (repeat 1000
- (xdrx_ui_prgcmdbar T) (princ)
- (xdrx_mdelay 10)
- )
- (xdrx_ui_prgcmdbar)
- (princ " Ready!")
- (princ)
- )
三、左上角标题栏进度条
![](source/plugin/imc_colorcode/images/loading.gif) - ;;-----------------------------------------------
- ;; Titlebar xdrx_ui_prgtitlebar
- ;;-----------------------------------------------
- (defun C:PROGRESS3 ( / )
- (xdrx_ui_prgtitlebar "Command PROGRESS3: " 1000 0.5)
- (repeat 1000
- (xdrx_ui_prgtitlebar T)
- (xdrx_mdelay 10)
- )
- (xdrx_ui_prgtitlebar)
- (princ)
- )
四、非模式对话框进度条 (三种位置:绘图窗口的上、中、下、两种方式:带标题栏和不带标题栏)
三种位置:
(xdrx_ui_prgdlgbar "Command PROGRESS4: " 1000 0.5 "Up")
(xdrx_ui_prgdlgbar "Command PROGRESS4: " 1000 0.5 "Center")
(xdrx_ui_prgdlgbar "Command PROGRESS4: " 1000 0.5 "Down")
带标题栏(位置中间)
(xdrx_ui_prgdlgbar "Command PROGRESS4: " 1000 0.5 "Title")
![](source/plugin/imc_colorcode/images/loading.gif) - ;;-----------------------------------------------
- ;; Modeless xdrx_ui_prgdlgbar
- ;;-----------------------------------------------
- (defun C:PROGRESS4 ( / )
- (xdrx_ui_prgdlgbar "Command PROGRESS4: " 1000 0.5 "Title")
- (repeat 1000
- (xdrx_ui_prgdlgbar T)
- (xdrx_mdelay 10)
- )
- (xdrx_ui_prgdlgbar)
- (princ)
- )
|