图3.5 添加自定义成员
图3.6 接口向导总结
(5)双击工程资源管理器中的usercontrol1,打开控件界面设计窗口。插入一个图像框,调整大小,以便用于建立ph图的坐标系统。
图3.7 ph图坐标界面
图片框中的坐标建立采用 以下代码,其中pc表示选择的制冷工质的临界温度:
Picture1.Scale (60, Log(1.2 * pc) / Log(10))-(600, Log(50) / Log(10))
横坐标从60到600,纵坐标为压力的对数值,从log(10)到log(1.2*pc)。
(6)临界曲线的绘画,首先通过INFODLL函数求出工质的临界温度,设为温度上限,由于常用工质制冷范围不低于180K,在该温度下也没有达到这些工质的凝固点,所以设180K为临界曲线的下限。
由于临界曲线上定下温度与压力,ph图上会有两个点与之对应,所以必须分别求出两点的具体焓值。利用如下语句进行临界曲线的绘画:
For t = 180 To tc Step 1 '临界曲线1
j = j + 1
Call SATTdll(t, x(1), 1&, p, Dl, Dv, xliq(1), xvap(1), ierr, herr, 255&)
quxian2(j) = p
t = t + 0.000001 '该点温度加上一个微增量表示临界曲线右半边点,减去一个微增量则表示临界曲线左半边的点
Call TPFLSHdll(t, p, x(1), d, Dl, Dv, xliq(1), xvap(1), q, e, h, s, cv, cp, w, ierr, herr, 255&)
quxian1(j) = h / wmm
pp1 = Log(quxian2(j)) / Log(10)
pp0 = Log(quxian2(j - 1)) / Log(10)
Picture1.Line (quxian1(j - 1), pp0)-(quxian1(j), pp1)
Next
设置温度从180K到tc,利用SATTDLL函数求出温度对应点上的压力值,再通过求出的压力和温度,调用TPFLSHDLL函数求出该点的焓值,这样就得到了临界曲线上该温度的压力和焓值,在ph图上绘出点来,与之后的点进行连线,循环以上步骤,绘出临界曲线来。
(7)制冷系统的工作过程ph图的绘画,利用输入的设定温度先确定压缩机入口的压力值,设定温度加上过热度可以算出压缩机入口温度压力,这里假定压缩过程为等熵过程,先利用函数TPFLSHDLL,输入压力,温度,确定等熵过程的熵值
再调用函数PSFLSHDLL函数可求出随着压力变化而变化的焓值,这样就能在ph图上表示出等熵过程曲线,同样利用冷凝压力与过冷度求出冷凝器出口焓值,通过连线就能画出完整的ph图来。
(8)ActiveX控件的封装,在文件菜单中选择生成ocx,至此ActiveX控件制作完成。
图3.8 生成ocx
(6)再需要使用该控件时,需要在计算机上注册该控件,具体方法:
打开开始菜单,选择运行,在运行窗口中的打开文本框中输入regsvr32和具体路径,如regsvr32 C:\Users\Administrator\Desktop\物性查询ocx\ocx\工程1.ocx,点确定。
图3.9 加载ocx控件
(7) 弹出下图中的对话框,说明注册成功,可以在其他程序中调用该ActiveX控件了,实现物性查询和计算功能。
图3.10 注册成功
3.5.4 力控的axtivex控件的插入方法
(1) 打开力控软件新建一个工程进入开发环境
(2) 选择菜单查看点击工具箱,打开工具栏。
图3.11打开工具箱
(3) 在工具栏中的ActiveX控件栏中在选择对象处右键选添加,弹出的OLE控件管理器选右边的添加按钮,在插入ActiveX控件对话框中找到之前制作的ocx控件,选确定。
图3.12 activex控件的添加
图3.13 OLE控件管理器 压缩机性能试验软件系统设计+文献综述(7):http://www.751com.cn/jixie/lunwen_2811.html