EDA365电子论坛网»电子社区 › EDA工具&PCB设计 › Allegro Skill开发 › 哪位大佬知道下面这种进度条是如何制作的

哪位大佬知道下面这种进度条是如何制作的

查看数: 1265 | 评论数: 19 | 收藏 0

关灯 | 提示：支持键盘翻页<-左右->

帖子模式

亦久忆旧

发布时间: 2025-6-30 00:06

正文摘要:

本帖最后由亦久忆旧于 2025-6-30 00:07 编辑哪位大佬知道这种进度条是如何设置更新显示的？我现在在form中设计了1个进度条，但是不知道如何刷新显示，设置颜色

db-_- 发表于 2025-6-30 09:42

X:\Cadence\SPB_17.2\share\pcb\examples\skill\form\basic
这个路径下面有个axlform.il，你按照il里面的提示运行一下，相信你会form有更深的理解。

这个路径的其他SKILL也可以说是SKILL编程的官方案例，写得很标准，是个大宝藏了。

点评

学无止境```

这个有点看不明白怎么运行详情回复发表于 2025-6-30 11:12

学无止境``` 发表于 2025-6-30 16:07

db-_- 发表于 2025-6-30 15:35
NO！建议好好看看这个il文件噢。

DBdoctor();导出之前检查PCB
if(dbCheckStatus
then
CAM_Valid = axlFormGetField(GerberExport_form "CAM_BOX")
SMD_Value = axlFormGetField(GerberExport_form "SMD_BOX")
PDF_Value = axlFormGetField(GerberExport_form "PDF_BOX")
DXF_Value = axlFormGetField(GerberExport_form "DXF_BOX")
ipc_value = axlFormGetField(GerberExport_form "checkbox_ipcversion")
;更新状态显示
when(CAM_Valid
Export_Film() ;导出光绘
Export_NCdrill() ;导出钻孔数据
Export_rou() ;导出槽孔数据
;导出IPC文件
when(ipc_value
case(ipc_value
("IPC-D-356A"
;调用ipc_out.exe导出->IPC-D-356A
Export_ipc356A()
)
("IPC-D-356"
;调用ipc_out.exe导出->IPC-D-356
Export_ipc356()
)
);end case
);end when
);end when
when(SMD_Value
Export_xy() ;导出坐标文件
Export_SMDPDF() ;导出贴片 pdf
);end when
when(PDF_Value
Export_PDF() ;导出贴片 pdf
);end when
when(DXF_Value
Export_DXF() ;导出贴片 DXF
);end when
else
axlUIConfirm("Error:Current design exit DRC")
);end if

复制代码

大佬，上面的函数都是使用axlRunBatchDBProgram导出的相关文件，这个为什么不是顺序执行的

点评

db-_-

你是各个export用什么函数执行的？详情回复发表于 2025-6-30 16:31

学无止境``` 发表于 2025-6-30 16:37

db-_- 发表于 2025-6-30 16:31
你是各个export用什么函数执行的？

;-----------------------导出光绘/钻孔/槽孔/坐标/pdf/DXF/ipc文件----------------------------------------
;在进行导出相关文件之前，先运行DBdoctor检查设计有无错误
defun( DBdoctor ()
;调用dbdoctor.exe检查设计
sprintf(format "dbdoctor -$ -check_only %s" axlCurrentDesign())
dbCheckStatus = axlRunBatchDBProgram("Checking db records" format ?logfile "dbdoctor" ?noProgress t ?warnProgram t)
);end defun
;调用artwork.exe导出->光绘文件
defun( Export_Film ()
axlRunBatchDBProgram("export artwork" "artwork -$ %s" ?logfile "photoplot" ?noProgress t ?warnProgram t)
);end defun
;调用nctape.exe导出钻孔文件
defun( Export_NCdrill ()
sprintf(cmd "nctape -$ -b -o -n %s.drl %%s", axlCurrentDesign())
axlRunBatchDBProgram("Generating Drill Files..." cmd ?logfile "ncdrill" ?noProgress t ?warnProgram t)
);end defun
;调用ncroute.exe导出槽孔文件
defun( Export_rou ()
sprintf(cmd "ncroute -$ -o -n %%s.rou %s" axlCurrentDesign())
axlRunBatchDBProgram("Create ncroute" cmd ?logfile "ncroute" ?noProgress t ?warnProgram t)
);end defun
;调用plctxt.exe输出->坐标文件
defun( Export_xy ()
sprintf(cmd "plctxt -$ -c %%s %%s %s_xy_ByBodyCenter" axlCurrentDesign())
axlRunBatchDBProgram("Export place xy" cmd ?logfile "plctxt" ?noProgress t ?warnProgram t)
);end defun
;选择IPC版本时，导出IPC文件
defun( Export_ipc356A ()
sprintf(cmd "ipc356_out -$ -A %%s %s.ipc" axlCurrentDesign())
axlRunBatchDBProgram("Export IPC-D-356A" cmd ?logfile "ipc356_out" ?noProgress t ?warnProgram t)
);end defun
;选择IPC版本时，导出IPC文件
defun( Export_ipc356 ()
sprintf(cmdFmt "ipc356_out -$ %%s %s.ipc" axlCurrentDesign())
axlRunBatchDBProgram("Export IPC-D-356" cmdFmt ?logfile "ipc356_out" ?noProgress t ?warnProgram t)
);end defun
;导出所有光绘层PDF文件
defun( Export_PDF ()
;输出光绘层PDF
sprintf(cmd "pdf_out -$ -p -B %%s -o %s" axlCurrentDesign())
axlRunBatchDBProgram("Export PDF" cmd ?logfile "pdf_out" ?noProgress t ?warnProgram t)
);end defun
;导出贴片所需的PDF文件
defun( Export_SMDPDF ()
;输出SMD PDF
sprintf(cmd "pdf_out %%s -p -B -x -C -f ASM_TOP -f ASM_BOTTOM -o %s_SMD" axlCurrentDesign())
axlRunBatchDBProgram("Export SMD PDF" cmd ?logfile "pdf_out" ?noProgress t ?warnProgram t)
);end defun