PD12的自动化武器
Author:zfive5(dong)
Email :zfive5@yahoo.com.cn
引子
前些日子,在用pd12画对象模型的时候,由于自己没有仔细看清规范(看来自己视力真的不太好),导致自己的敲入的属性编码,全都命名为Pascal方式了,一个个点击开改吗?(20几个类,200多个属性呀,估计起码也要30分钟) 咋办? 受一位老同事的影响和教育,打算看看有什么懒惰的方法来达成目标,值得庆幸的是PD12支持自动化(就是IDispatch), 当然还有另一种思路没有实践,估计也没有问题,xml分析.
方法
C#例子:
PdCommon.ApplicationClass a = new PdCommon.ApplicationClass();
PdOOM.BaseModel ExistingModel = (PdOOM.BaseModel)a.OpenModel("D://1.oom", PdCommon.OpenModelFlags.omf_DontOpenView|PdCommon.OpenModelFlags.omf_Hidden);
foreach(PdOOM.Package p1 in ExistingModel.Packages)
{
if(p1.Code == "haha")
{
try
{
foreach (PdOOM.Class c1 in p4.Classes)
{
if (c1.IsShortcut() == false)
{
foreach (PdOOM.Attribute a1 in c1.AllAttributes)
{
string sc="";
If (a1.Code.Length > 1)
sc = a1.Code.Substring(0, 1).ToLower() + a1.Code.Substring(1);
else
sc = a1.Code.ToLower();
a1.Code=sc;
}
}
}
goto ZFIVE5_1;
}
}catch(Exception e2)
{
}
}
}
ZFIVE5_1:
ExistingModel.Close(true);
ExistingModel = null;
这个例子调试编写大约花了1个多小时,比我直接修改可能多花点时间,但作为回报熟悉学会了一种新东西的使用,将来其它类似问题也能够作到通用.
如果有需要和可能的话,以后自己编写设计大型程序时,一定会考虑script(自动化).当然xml是更开放的另一种选择.