2006年6月14日

摘要: 从 pb2.1开始,可以复制趋势图格式不过我没有用过代码凑合着看了看页面如此这般安排一下放一个btn触发事件 页面上放2个格式不一样的tnd按一下 2个tnd格式一下 Dim MyTrendF As PBSymLib.TrendFormat Set MyTrendF = Application.ActiveDisplay.SelectedSymbols.Item(1).GetFormat ... 阅读全文
posted @ 2006-06-14 17:17 zljini 阅读(331) 评论(0) 推荐(0) 编辑
摘要: 个别时候 我们将用到实体对象不过用起来 ,确实很不方便剪贴一段代码过来懒得多分析 Dim i As Integer, iYadder As Integer, iXadder As Integer Dim iBottom As Integer, iLeft As Integer, iTop As Integer, iRight As Integer iTop = 15000 iBottom = ... 阅读全文
posted @ 2006-06-14 15:47 zljini 阅读(295) 评论(0) 推荐(0) 编辑

2006年6月13日

摘要: 组合对象在 实际用处不多随便做了例子了假设页面上 有一个组合对象Composite1 和几个零散的对象,我们要点一个 加一个 ThisDisplay.Symbols.Item("Composite1").GroupedSymbols.Add _ ThisDisplay.SelectedSymbols.Item(1).Name再加一个btn,点一次,分拆一个Dim iSym As Inte... 阅读全文
posted @ 2006-06-13 20:43 zljini 阅读(217) 评论(0) 推荐(0) 编辑

2006年6月12日

摘要: 我对图形的使用是这样的用一些一样的图形 代表某个一类的数据比如 长方形 表示变压器,线条表示电线 可能有些这样的需求我点一个长方形,就要自动选择所有的长方形点一个电线,就把所有的电压 都显示出来这个主要是对图片的类型在操作 已经一个add 或者select操作 Dim i As Integer Dim MyType As Integer MyType = ThisDisplay.Selec... 阅读全文
posted @ 2006-06-12 15:10 zljini 阅读(266) 评论(0) 推荐(0) 编辑

2006年6月9日

摘要: 个人觉得 addin的开发是pi 二次开发里,最有意思的东西了简单的说,类似Excel里的宏,一次开发,到处使用。插件其实是一个COM组件,使用插件的目的就是通过插件来控制宿主程序,只需要一次部署,重复开发工作量小,而且下载方便它定位于Av或PB环境下PB图二次开发的辅助使用工具,能够方便的对Pb图上的元素进行各种设置,不仅突破了pb的能力,更是拓展了Av的功能。下面开始写吧在VB里启动一个add... 阅读全文
posted @ 2006-06-09 16:38 zljini 阅读(549) 评论(2) 推荐(1) 编辑

2006年6月8日

摘要: 假设 现有有一个程序 比如PI 或者是 Excel我想在它的工具栏里 添加一个自己定义的应该如何开发一般来说 这个是Addin 但是没有做过请做过的指点一下谢谢就是在那 一拍 文件,编辑,视图等等地方 插一个自己做的东西至于这个东西要实现什么功能,另外再说谢谢 阅读全文
posted @ 2006-06-08 21:32 zljini 阅读(274) 评论(0) 推荐(0) 编辑

2006年6月6日

摘要: PI ProcessBook应用程序本身并没有相关联的代码窗口,我们利用WithEvents定义一个对象同过该对象变量来应用事件 不过 实践里 从来没有用过 呵呵 基本上就是Dim WithEvents pbx As Applicationset pbx=PBObjLib.Application之后 你可以看见 pbx有很多事件例如打开pb 关上pb 新建pb 等等例子就不举了 变颜色的例子 ... 阅读全文
posted @ 2006-06-06 16:16 zljini 阅读(373) 评论(0) 推荐(0) 编辑
摘要: 代码写在ExcelVBA里 要求打开一个pdi,上面有一个Val1Dim WithEvents valX As PBSymLib.ValueDim pbkX As PBObjLib.ApplicationPrivate Sub valX_DataUpdate()AppActivate "Microsoft Excel"MsgBox 1End Sub Private Sub Workbook_O... 阅读全文
posted @ 2006-06-06 11:59 zljini 阅读(501) 评论(0) 推荐(0) 编辑

2006年6月5日

摘要: 以下是代码 可以打开一个txt文件 关键是 打开一个过后 就不能打开第二个了界面上 有一个 RichTextBox 和一个 BTN ,点Btn之后,先清空RichTextBox,再load一个Txt我想在load一个 就开始报错了应该如何做了?Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System... 阅读全文
posted @ 2006-06-05 22:20 zljini 阅读(964) 评论(0) 推荐(0) 编辑
摘要: 可以在声明对象变量时使用“WithEvents”将它指向当前选定的对象。该变量即可响应当前选定对象的触发事件。该方法允许在不同的对象间共享相同的代码。 可以比较一下和set的细微差别,2者的事件有所差异。 还是拿原来那个 趋势图一拉游标,所有点就变时间的例子,你可以看看区别。 我们把所有的trend 声明成 withEvents的 一个TNDX 对象 当你... 阅读全文
posted @ 2006-06-05 14:45 zljini 阅读(456) 评论(0) 推荐(0) 编辑