傀儡--盖德问答-化工人互助问答社区

傀儡

影响力0.00

经验值0.00

粉丝8

库房管理员

关注已关注 私信

他的提问 2295 他的回答 13753

装置检修后试压问题？可以直接用蒸汽试压，不过，升到压力后，直接对塔系进行检查，蒸汽试压若漏，可直接看出来，但用蒸汽进行保压测试就不行了，如楼主所说，存在冷凝过程，是保不住压的。查看更多

0条评论

北方单位在冬季停工的，该如何进行保护？ 支持楼主!帖子贴合实际,可操作性强. 希望能够成为朋友! lujr10000 查看更多

0条评论

来自话题：

工艺技术

，

蒸发残渣与蒸馏残渣的区别？ 上面说的对，是根据所需成分不同来区分的，蒸发残渣多为固体查看更多

0条评论

焦炭质量问题？我们这原来也是顶装，根据我们这儿的配比情况，我认为是你们气煤配加量太大，焦炭气孔壁薄耐磨强度差，热反应强度做吗，多高？我感觉热强度也不会太高。降低气煤配比，增加肥煤及瘦煤。另认为标准温度定的有些低，焦炭成熟情况如何？查看更多

0条评论

来自话题：

化学学科

，

转化器列管使用寿命短？ 13楼分析的很全了，佩服。我认为热水相腐蚀是主要原因，特别是靠下部分。若靠上，通常是反应温度过高。其它位置，应是列管材质稍差。至于使用时间，我厂有1981年购买的转化器，2002年才换掉的，用了21年，以前水中加碱调ph值，ph值大于10的时候多。感觉跟用纯水差不多，都不能避免腐蚀。现在的缓蚀剂也许好一些了吧。有机会用一用。查看更多

0条评论

用纯聚四氟乙烯板自剪垫片能用于DN1000的容器法兰上吗？ ...？ 你可以看看这篇文章查看更多

0条评论

来自话题：

工艺技术

，

凯洛格流程烃类蒸汽转化法大型合成氨厂家收集？ 4# 黄新会赤天化和云天化的装置都是凯勒格的，而且一直是用天然气的，凯勒格和ici有个很大的区别，前者在设计上有一定的余量，所以，可以进行技改，提高产能，但是ici的就不行了查看更多

0条评论

来自话题：

仪器设备

，

动设备之专题讲座“泵”，每天学点知识（2）离心泵结构 ...？ 那个楼上谁说的先混个脸熟，建立一点理性认识，再来感性认识，再理性认识。最后就会印象深刻。有道理。查看更多

0条评论

特种设备证后监管办法,从什么时候开始? 是的，其他省区尚未见到类似文件出台。查看更多

0条评论

cad画流程图时有关插入阀门等块的小程序(自动断线，自动 ...？有一段时间没写程序了，前几天看见有朋友提出在流程图中插入阀门时自动断线、移动阀门时管线自动跟随的问题，为此花了一点时间写了个lisp小程序完成以上要求，效果参见下面动画。程序中使用了对象反应器，实际上是vba中的东西了，不过比较喜欢lisp编程，所以就采用了lisp代码。一直没有深入的学arx，虽说很强大，但兼容行太差！不过最近在学.net，兼容行还不错，采用c#编译成类模块(activex dll)，然后在cad中加载，性能应该不比 arx差。好了，闲话少说，以下为源码： (defun c:val (/ pt an lin1 ps1 ps2 lin2 bn vals p1 p2 paras) (vl-load-com) (command ".undo" "begin");设定undo起点 (setq pt (getpoint "选择插入点\n")) (setq an (getangle pt "选择角度\n")) (setq lin1 (ssget pt '((0 . "line")))) (setq bn "截止阀") ;;块名称 ;;插入块 (entmake (list (cons 0 "insert") (cons 2 bn) (cons 10 pt) (cons 50 an) ) ) (setq vals (entlast));想用entmakex直接返回图元名，但在acad2007中却返回0，2009中却正确，没办法只好采用entlast了。 ;;取得选择集中第一条直线 (setq lin1 (ssname lin1 0)) ;;计算打断点 (setq p1 (polar pt an 3)) (setq p2 (polar pt (+ an pi) 3)) ;;执行打断 (command "._break" lin1 "non" p1 "non" p2) (setq lin2 (entlast)) ;打断后的直线，则lin1、lin2为连接阀门的两条线p1、p2为两个连接点. (setq paras (list lin1 lin2 pt)) ;创建参数表 ;;转换为activex对象,并创建为表 (setq vals (list (vlax-ename- vla-object vals))) ;;创建被修改时的反应器，回调函数为val:moved(),val:erased() ;; vlr-object-reactor 的第一个参数是 ;; “第一个参数指定 ;; 与反应器相关联的对象所需放置的 ;; 位置。在本例中，它是存储 ;; 在 vals。 ;; 第二个参数为相关联的数据 ;; 第三个参数是我们要使用的特定反应器类型。 ;; 这些反应器是 ;; 修改对象时调用的反应器,主要是移动 ;; 删除对象时调用的反应器 (setq valsreactor (vlr-object-reactor vals paras '((:vlr-modified . val:moved) (:vlr-erased . val:erased) ) ) ) (setq valsreactor (vlr-pers valsreactor)) ;变为永久反应器,文件关闭时保留反应器相关信息，如果找不到回调函数 ;信息，将会提示错误，因此如果需要将dwg文件发给客户，建议复制一份 ;然后删除相关反应器,后面给出了清除反应器的函数，执行一下即可 (command ".undo" "end") ) ;;;--------------------------------------------------------------; ;;; 函数：cleanreactors ; ;;;--------------------------------------------------------------; ;;; 说明：用于清除反应器 ; ;;; 通用的实用程序函数。它可以在调试时使用， ; ;;; 也能在关闭图形以前清除 ; ;;; 打开的vlr-object-reactor反应器。 ; ;;;--------------------------------------------------------------; (defun cleanreactors () (mapcar 'vlr-remove-all '(:vlr-object-reactor ) ) ) ;阀门移动时的回调函数 (defun val:moved (obj reactors para / objs paras lin1 lin2 pt0 pt1 p11 p12 an p1 p2 ps angs lins ) ;;阀门删除时也会出发modified反应器，此为判断是否被删除 (if (not (vlax-erased-p obj)) (progn ;不是被删除 (setq objs (entget (vlax-vla-object- ename obj))) ;转换为autolisp图元 (setq pt1 (cdr (assoc 10 objs))) ;移动后的插入点 (setq an (cdr (assoc 50 objs))) ;获取角度 (setq paras (vlr-data reactors)) ;转换表 (setq lin1 (car paras)) ;取得第1条直线 (setq lin2 (cadr paras)) ;取得第2条直线 (setq pt0 (nth 2 paras)) ;取得原来的插入点 ;;判断已经移动,如果未移动则不作处理 (if (not (eq pt0 pt1)) (progn ;;计算新的交点 (setq p1 (polar pt1 an 3)) (setq p2 (polar pt1 (+ an pi) 3)) (setq p11 (cdr (assoc 10 (entget lin1)))) ;直线1起点 (setq p12 (cdr (assoc 11 (entget lin1)))) ;直线1终点 (setq angs (angle p11 p12)) (if (equal angs (angle p2 p1) 1e-2);有时计算出来的角度会有小数点的差别，所以加上精度判断 ;判断直线与阀门方向确定两条线与阀门的交点 (progn (setq ps p1) (setq p1 p2) (setq p2 ps) ) ) ;修改直线1的终点及直线2的起点为与阀门交点 ;直线1 (setq lins (entget lin1)) (setq lins (subst (cons 11 p1) (assoc 11 lins) lins)) (entmod lins) ;直线2 (setq lins (entget lin2)) (setq lins (subst (cons 10 p2) (assoc 10 lins) lins)) (entmod lins) ;;重新关联反应器数据 (vlr-data-set reactors (list lin1 lin2 pt1)) (princ "\n移动") ) ) ) ) ) ;阀门删除时的回调函数 (defun val:erased (obj reactors para / lin1 lin2 ps1 ps2) (setq paras (vlr-data reactors)) ;转换表 (setq lin1 (car paras)) ;取得第1条直线 (setq lin2 (cadr paras)) ;取得第2条直线 (setq p1 (assoc 11 (entget lin2))) (entdel lin2) ;删除线2 (setq lins (entget lin1)) (setq lins (subst p1 (assoc 11 lins) lins)) (entmod lins) ) 使用方法：此程序只演示了一个叫做“截止阀”图块的插入，如果用于其它图块，须自行修改。 1.需要先建立一个名称为“截止阀”的图块，尺寸为6x3，插入点为阀的中心。 2.加载程序，执行val命令进行插入操作，如采用其它方法插入，则不会出发反应器。注： 1.由于时间关系，程序仅写出了主要的部分，细节的东西并没有进行(如：创建图块或从其它文件调入图块、错误判断等)，也作为抛砖引玉吧，希望后来者完善。 2.最好吧完善的程序加载的cad的启动项，如此会更方便。 3.程序中使用了永久反应器，文件关闭是会保留相关反应器信息，如果cad中没有加载程序，则编辑以前的文件中的相关块时会出现错误信息，虽说不会造成cad崩溃，但看起来不雅，因此文件发给客户前最好删除相关反应器。程序中给出了删除反应器的代码，可根据需要自行调用。 4.只针对line线，pline无效！查看更多

0条评论

aspen 哪个版本好用?？各个不同版本的区别一是数据库，二是新模块。如果你用到的功能一般，推荐用7.2，对配置要求低。如果电脑配置高，完全可以安装两个版本。我就是安装两个版本，7.2和8.4，新旧版本兼顾。查看更多

0条评论

来自话题：

工艺技术

，

答疑专贴办公室：Aspen Plus模拟精馏塔，反应器，换热 ...？ 新手，主要来向前辈学习查看更多

0条评论

求GB50160-2008的英文版有的给发一个？ 楼主英文版的gb50160吗?我也需要查看更多

0条评论

来自话题：

仪器设备

，

工艺技术

，

化工工艺的重要组成部分------装备与控制？ 需要回复吗，好好看看查看更多

0条评论

一款CAD阀门3D图？ 不错很有帮助查看更多

0条评论

来自话题：

仪器设备

，

工艺技术

，

PVCV树脂用的国产包装码垛机哪家好? 还是用进口的吧，国产的是在用不住，推荐纽朗我们用纽郎的缝包机，三天两头坏，配件死贵。查看更多

0条评论

换热器使用温度已知怎样选用材料？ 谢谢 6# binghe86319 查看更多

0条评论

一次盐水泵选型？ 钛泵材质不耐磨，最好选耐磨合金材质，查看更多

0条评论

请教一个气相分率和温度的问题？谢谢您的提醒，但现在还没做到那一步。目前用aspen中heatx收敛后获取热曲线然后导入b-jac中，现在有些新 ... 你的问题太奇怪了，出口压力你是如何指定的？查看更多

0条评论

其它省份的成绩是不是要到2013年了？ 我说天津的通过率50%，这么高查看更多

0条评论

上一页473 474 475 476 477 478 479 480 481 482 483下一页

简介

职业：济南惠成达科技有限公司 - 库房管理员

学校：湖北大学 - 化学化工学院

地区：甘肃省

个人简介：无聊的时候，只能发说说刷存在感。查看更多

喜爱的版块返回首页

已连续签到天，累积获取个能量值

第1天
第2天
第3天
第4天
第5天
第6天
第7天