关于AD软件PCB环境下，器件ID能否批量清除

2723498933

由于工作的需要，在PCB编辑界面下，有时需要对器件ID批量清除，想问问大神们有什么好的方法没？file:///C:\Users\Administrator.DGKJ-20140615HP\AppData\Roaming\Tencent\Users\2723498933\QQ\WinTemp\RichOle\R8KT13K`J1)0DL$]_4WQJ3C.jpg目前我只能手动清除。

icm

1.File/ New/ Script Files/ Delphi Script Unit
( ~! R- N; k  p, w1 Q/ ^, m2.paste code
* A# y& L7 k% {# v, ]. V* Y  m( Z3.open PCB document
/ \- G. r# U8 x  G+ `0 S3 H4.DXP/Run Script
5.Select RemoveCompID and press OK

icm

創建個DELPHI腳本
9 T/ q7 G' K4 i1 `2 W4 m9 s- ?: ]7 ~
0 M& i- v! v9 i7 V- U  QProcedure RemoveCompID;
7 M" V  ]$ c3 [& j  ^5 GVar
, K: a5 w7 w7 Z7 u- A$ `    Component               : IPCB_Component;
& t8 _) h& z# [  v! c: Y. \2 P    ComponentIteratorHandle : IPCB_BoardIterator;
: s7 j/ i$ e4 @' l& a7 kBegin
    If PCBServer.GetCurrentPCBBoard = Nil Then Exit;
) o1 |7 H) R1 H$ v5 F7 F    ComponentIteratorHandle := PCBServer.GetCurrentPCBBoard.BoardIterator_Create;
; C4 H+ c$ e$ E: x    ComponentIteratorHandle.AddFilter_ObjectSet(MkSet(eComponentObject));
* @7 c; P  ?6 I2 T% V# q    ComponentIteratorHandle.AddFilter_LayerSet(AllLayers);
9 n! m% x* @3 {    ComponentIteratorHandle.AddFilter_Method(eProcessAll);
8 J. T" d# h+ B    Component := ComponentIteratorHandle.FirstPCBObject;
- c$ q* ]& y8 e' b0 v    While (Component <> Nil) Do
: o9 S+ F" B4 k    Begin
* j7 D. `7 h3 k1 D) u' O        Component.SourceUniqueId := '';
$ b6 v5 F7 W  a5 G' c! d1 m        Component := ComponentIteratorHandle.NextPCBObject;
    End;
    PCBServer.GetCurrentPCBBoard.BoardIterator_Destroy(ComponentIteratorHandle);
! M1 g7 W7 N- ~! D; TEnd;

2723498933

大神们好像都不怎么关注这类问题呀！求有没有解答的方式；谢谢！

2723498933

icm 发表于 2015-9-18 12:04
/ u, x  O" a" o創建個DELPHI腳本

( r3 r* M$ ?' N# q, @5 ]9 r* ZProcedure RemoveCompID;

9 Z4 D/ T/ y4 K* \* w' E: g- i如何创建脚本呢？之前没弄过，可以做分教程吗；大师

wanghanq

不理解为何要清除？

2723498933

wanghanq 发表于 2015-9-20 23:19
- ^! x3 E5 \  L2 ]: J( y0 p' ~不理解为何要清除？

  b* ~* d$ l# V' X8 g. F% [( |可能每个人的工作性质不一样，我有时画图时确实用的上！所用想问问有没有解决这方面的办法！

2723498933

icm 发表于 2015-9-21 10:02
1.File/ New/ Script Files/ Delphi Script Unit
2.paste code
! H, P9 v# X0 v. A% C3.open PCB document

) t" C! F  e" @1 }& B/ H感谢！脚本刚刚试了！都清除了！真心感谢！
$ p2 v& r- Y) f* R8 m0 d0 ?" V6 D

wenqing89

听说过隐藏元件参数啥的，第一次听说清楚ID的，有什么好处嘛？

wanghanq

2723498933 发表于 2015-9-22 08:43
可能每个人的工作性质不一样，我有时画图时确实用的上！所用想问问有没有解决这方面的办法！

7 j0 ^& B  O7 N+ x1 c

- i2 p/ ~* Z2 O9 z6 H& m了解下原因只是为了看是否从源头上解决
  P7 H& k8 Q0 O类似问题：如 重复ID 带来的影响。

- {# B! c( Q9 ~" {  p比如，虽然工作性质不同，但看贴的包括我并不能理解  ID 对你那边有啥影响？然后有必要去清除它
; q0 Q$ R* `) T

wanghanq

以前遇到的受到 Unique ID 困扰的情况可参下面汇总
, w9 n# p0 S( _* p) q/ `: p+ g- n
Protel (Altium) 文章-观后感--&gt;分享-探讨 汇总收集帖
% N& |% v% p  [# B) Whttp://www.pcbbbs.com/thread-256501-1-1.html

% s$ Q9 ^8 r, q2 `% g+ _& [: B中的 汇总11  和 汇总66  （汇总的eda365论坛的帖子）

SCH界面中的Tools/Convert/Reset Component Unique IDs
% L- X7 }1 r1 E+ L* V0 O7 SPCB界面中的project/component link 来同步 Unique ID
3 d( @3 ~. X7 B' e8 r$ E3 Q9 I6 }基本要求是 文档完全匹配（做到完全匹配最基本的就是互相_sch到pcb或pcb到sch eco 通常项目通过）
提醒：ECO（Engineering Change Order）的检查项目是可编辑选择的（在project/project options）
7 c* L/ q2 K5 x$ b$ Q) b文档完全匹配 等价于 网络等必要条件完全匹配
) M! F. V7 l. R8 `. B3 \我们可以做到一个sch和多个“不同的”PCB做到完全匹配

$ K: }5 J3 G  H, I6 B$ N

zcllom

icm 发表于 2015-9-18 12:04
創建個DELPHI腳本
- S* L. h4 l7 M. ?- B
2 Q6 e8 h, f0 Q9 M; Y- K" q) M1 D7 d# xProcedure RemoveCompID;

到了弄脚本的程度，自然是高手高手高高手。
$ s) F$ i0 P2 v- Q( J) Q