首页 OBEL语言学习总结剖析

OBEL语言学习总结剖析

举报
开通vip

OBEL语言学习总结剖析OBEL语言学习1.Obel语言简介(1)Obel语言是一种针对trigger和action的脚本语言。(2)Obel语言是通过xos在计算机和系统之中进行信息传递的语言。2.Obel语言一些重要定义(1)有一些对象不用写任何Obel代码就其本身的创建trigger,action,target,就可以执行。(2)子类具有父类的所有方法。例如v_alarm_table的父类是v_rt_table,v_rt_table、v_slow_table的父类是v_table.。(3)两种路径的规则:A:对globalrefer...

OBEL语言学习总结剖析
OBEL语言学习1.Obel语言简介(1)Obel语言是一种针对trigger和action的脚本语言。(2)Obel语言是通过xos在计算机和系统之中进行信息传递的语言。2.Obel语言一些重要定义(1)有一些对象不用写任何Obel代码就其本身的创建trigger,action,target,就可以执行。(2)子类具有父类的所有 方法 快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载 。例如v_alarm_table的父类是v_rt_table,v_rt_table、v_slow_table的父类是v_table.。(3)两种路径的 规则 编码规则下载淘宝规则下载天猫规则下载麻将竞赛规则pdf麻将竞赛规则pdf :A:对globalreference(绝对路径)只有两种格式:对于除v_model以外的其它对象:/MODEL/class/instanceNameMODEL是AutoCAD的文件名,但必须全大写且无扩展名即使AutoCAD中的文件不是大写的,class如v_button等,instanceName是大小写敏感的。对于v_model:/MODEL/v_model/model_instanceNameB:对于localreference(相对路径)的规则:对于非model的对象:~class/instanceName对于model对象:~model(4)Obelsentence的语句格式:receiverObjectmethod:parameter(s);句末用分号,method后要加上冒号加空格后跟参数。说明:一个sentence可能包括多行(line)(5)Obel代码写在begin和Ature之间。obeI代码是大小写敏感的。(6)一段完整的代码示例methodTriggeronmsg:msg'注释放在单引号之间'begin|listnamefirst|'变量声明。注意:在开头的|后要有空格,在结束的|前也要有空格'first=true;'给boolen变量first初始化(即赋初值ture)'name=~v_OBEL_object/namegetObject;'把一个对象赋给name变量,~v_OBEL_objec/name没有具体指定'namestore:“Kristen”at:01;'把一些名字储存在name中'namestore:“Jeff”at:1;namestore:“Tyler”at:2;namestore:“KayLynn”at:3;namestore:“Lindsey”at:4;list=Listnew;'把一个列 关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf 对象赋给list变量0to:4do:[:i|'初始化循环'(first)'查看是否是第一个名字ifTrue:[first=false;list<<(namerecall:i);改变first的值'增加第一个名字给list对象];'结束do循环AtrueEnd3.Obel代码的执行及调试(1)在DOS下输入obelparse进入obel。(2)叹号!表示执行,!edit打开obel编辑器,!quit退出obel,!reset重新输入(3)ClassmethodsFor列出该类的所有方法。Classdump列出该类继承的所有方法。例如/SAMPLE/v_button/activate_adoesExist。(及系统中的类)。注意首字母Obellist:"classes"列出在runtime时可识别的类大写,且必须是双引号。Obellist:"interfaces"列出所作的xos中所有对象。4)创造一个试验用的信息框,其语法格式:(注意语法中的大小)1>MsgBoxmsgtxt:“helloworld2>ok:nil;3>!5)windows与pop_ups.windows是等同关系的,互不影响,而pop_ups是具有父子关系的,如果父画面关闭子画面随之关闭。有两个画面分别为father,child。father画面有一个按钮,对这个按钮写obel代码:若是~modelshowModel:"CHILD";则当father画面关闭时,child画面随之关闭,即他们是pop_ups关系,若代码是GrdxModelManshowModel:"CHILD";则当father画面关闭时,child画面不会关闭,即他们是windows关系.6)dismiss画面对于当前画面,即dismiss接受方法的对象所在画面时,用相对路径~modeldelete;即可,若是dimiss另外一个画面则必须使用绝对路径:/MODEL/v_model/model_namedelete7)设置控件的外部属性:8)string的连接操作是obel中非常重要的操作。str=str1<|var|2>var="TelventproducesthebestSCADAsystem"isSubStr:"cad";3>varprintNl;4>!则var得到false值且打印在屏幕上。str="strl"leftStr:int取出strl中左起的int个字符给str。同样还有rightStr4.面板的制作过程及解析(以一个阀的控制面板制作过程为例)面板CAD下名称:vp_val_cntl_rov王在开网设槪,巾巾Q全开到杭Q全并到柱退出ZSOSTorSAMXAROVLiTorxsoZLRDAarorLabelSQLLabclSQLlUbelSoo阀制0谀备维护中F图为vp_val_cntl_rov在CAD下的视图:3|km1ST按照从上到下,从左到右,从内到外的控件名称依次是:v_rt_text/namv_rt_text/namevbuttonicon/openvrttext/textlvbuttonicon/mt1vrttext/text11v_button_icon/closedv_rt_text/text2v_button_icon/localv_rt_text/text7v_button_icon/remotev_rt_text/text8v_button_icon/openningv_rt_text/text3v_button_icon/closingv_rt_text/text4\Jv_button_icon/mt2v_rt_text/text12v_button_icon/manlv_rt_text/text5v_button_icon/autov_rt_text/text6v_button_icon/dav_rt_text/text10v_button_icon/faultv_rt_text/text9v_button/open_oneselfv_button/close_oneselfv_button/execute_oneself相应的控件中的v_rt_text/controlv_button/openv_button/closev_button/executev_button/dismissOBEL语句的解释:v_button/set_mtv_button/set_nmtv_button/execute_mtv_model中一共有三个Trigger第一个TriggerShowModeI中语句(在第一次点击的时候执行的语句)**OBELMethod**Object:/VP_DEV_CNTL/v_modeI/VP_DEV_CNTLAuthor:Project:Date:WedMay2408:48:531995Note:ThismethodisexecutedwhentheShowModeI/messageissentto:/VP_DEV_CNTL/v_modeI/VP_DEV_CNTL—————methodTriggeronmsg:msgbegin|deviceaStrObjIDCIassNameModeINamestrTabIestrPointstrFieIdObjectListstrProfixstrSuffix|‘上面这句话实在定义初始量'seIfsetWindowType:"popup";‘设置面板初始方式为弹出式'seIfsetPopupTimeout:600;‘设置时间超过600秒没有操作自动退出'ObjID=seIfgetShowMsggetVaIue:"ObjectID";device=ObjectgetObject:ObjID;CIassName=devicegetCIassName;‘得到你所点击控件的cIass名'ModeIName=seIfgetModeIName;得到你所点击控件的ModeI名’strTabIe=devicetabIe;得到你所点击控件中加载的点的Table名(即analog,status等)’strField=devicefield;‘得到你所点击控件中加载的点的field名(即字段名)'strProfix=devicepointleftStr:6;‘得到你所点击控件中加载的点的point名中从左边开始的六位'(((devicepointrightStr:1)!="A")&&((devicepointrightStr:1)!="B")&&((devicepointrightStr:1)!="C")&&((devicepointrightStr:1)!="D")&&((devicepointrightStr:1)!="E")&&((devicepointrightStr:1)!="F"))‘逻辑与运算在这六个条件中只要有一个不成立即为False,全部成立为True'ifTrue:[strSuffix=devicepointrightStr:3;]‘如果为真得到你所点击控件中加载的点的point名中从右边开始的三位'ifFalse:[strSuffix=devicepointrightStr:4;];‘如果为假得到你所点击控件中加载的点的point名中从右边开始的四位'~v_rt_text/namesetText:strSuffix;把strSuffix中的值写到v_rt_text/name的控件中去’ObjectList=Listnew;ObjectListadd:"XSO";ObjectListadd:"XA";ObjectListadd:"ZSO";ObjectListadd:"DA";ObjectListadd:"SAM";ObjectListadd:"ZLR";ObjectListlist:[:item|device=ObjectgetObject:("/"+ModelName+"/v_rt_text/"+item);strPoint=strProfix+item+strSuffix;aStr=strTable+"."+strPoint+"."+strField;devicesetPoint:aStr;];.ObjectList=Listnew;ObjectListadd:"ROV";ObjectListlist:[:item|device=ObjectgetObject:("/"+ModelName+"/v_rt_text/"+item);strPoint=strProfix+item+strSuffix+"M";aStr=strTable+"."+strPoint+"."+strField;devicesetPoint:aStr;];‘把数据库中的点的字段值赋值到相应的控件中,例如status.CH0JANCHSO101F.cursta的格式'selfstore:("'"+strProfix+"ZSO"+strSuffix+"'")at:"open_close";selfstore:("'"+strProfix+"SAM"+strSuffix+"'")at:"sam";selfstore:("'"+strProfix+"ROV"+strSuffix+"M"+"'")at:"rov";把点名赋给全程变量,例如把CHOJANCHSO10赋给open_close这个全程变量'~v_sql_data_access/LabelSQLstart;~v_sql_data_access/LabelSQL1start;~v_sql_data_access/LabelSQL2start;触发v_sql_data_access/LabelSQL中的startTrigger'AtrueEnd第二个TriggerReshowModel中语句(不关掉打开的面板再次点击的时候执行的语句)**OBELMethod**Object:/VP_DEV_CNTL/v_model/VP_DEV_CNTLAuthor:Project:Date:WedMay24O8:48:531995Note:ThismethodisexecutedwhentheReshowModel/messageissentto:/VP_DEV_CNTL/v_model/VP_DEV_CNTLmethodTriggeronmsg:msgbegin|deviceaStrObjIDClassNameModelNamestrTablestrPointstrFieldObjectListstrProfixstrSuffix|selfsetWindowType:"popup";'selfsetPopupTimeout:6OO;ObjID=selfgetShowMsggetValue:"ObjectID";device=ObjectgetObject:ObjID;ClassName=devicegetClassName;ModelName=selfgetModelName;strTable=devicetable;strField=devicefield;strProfix=devicepointleftStr:6;(((devicepointrightStr:1)!="A")&&((devicepointrightStr:"B")&&((devicepointrightStr:1)!="C")&&((devicepointrightStr:1)!="D")&&((devicepointrightStr:1)!="E")&&((devicepointrightStr:1)!="F"))ifTrue:[strSuffix=devicepointrightStr:3;]ifFalse:[strSuffix=devicepointrightStr:4;];~v_rt_text/namesetText:strSuffix;ObjectList=Listnew;ObjectListadd:"XSO";ObjectListadd:"XA";ObjectListadd:"ZSO";ObjectListadd:"DA";ObjectListadd:"SAM";ObjectListadd:"ZLR";ObjectListlist:[:item|device=ObjectgetObject:("/"+ModelName+"/v_rt_text/"+item);strPoint=strProfix+item+strSuffix;aStr=strTable+"."+strPoint+"."+strField;devicesetPoint:aStr;];ObjectList=Listnew;ObjectListadd:"ROV";ObjectListlist:[:item|device=ObjectgetObject:("/"+ModelName+"/v_rt_text/"+item);strPoint=strProfix+item+strSuffix+"M";aStr=strTable+"."+strPoint+"."+strField;devicesetPoint:aStr;];selfstore:("'"+strProfix+"ZSO"+strSuffix+"'")at:"open_close";selfstore:("'"+strProfix+"SAM"+strSuffix+"'")at:"sam";selfstore:("'"+strProfix+"ROV"+strSuffix+"M"+"'")at:"rov";~v_sql_data_access/LabelSQLstart;~v_sql_data_access/LabelSQL1start;~v_sql_data_access/LabelSQL2start;AtrueEnd‘再次点击和头一次点击的语句是一样的'第三个TriggerUnshowModeI中语句(在面板退出的时候执行的语句)**OBELMethod**Object:/VP_DEV_CNTL/v_modeI/VP_DEV_CNTLAuthor:Project:Date:FriNov1012:07:241995Note:ThismethodisexecutedwhentheUnshowModeI/messageissentto:/VP_DEV_CNTL/v_modeI/VP_DEV_CNTL7—————methodTriggeronmsg:msgbegin|ObjNameObjID|ObjName=seIfgetShowMsggetVaIue:"ObjectID";ObjID=ObjectgetObject:ObjName;ObjIDdeseIect;‘语句的意思是释放掉所做的选择,并使其为未被选择状态AtrueEndLabeISQL中只有一个Trigger第一个TriggerStart中语句(在面板开始的时候执行的语句,在v_model中的showModel的Trigger中做的触发)**OBELMethod**Object:/VP_DEV_CNTL/v_sql_data_access/LabelSQLAuthor:Project:Date:TueJul2516:03:061995Note:ThismethodisexecutedwhentheStart/messageissentto:/VP_DEV_CNTL/v_sql_data_access/LabelSQLmethodTriggeronmsg:msgbegin|str|0to:3do:[:item|selfbindColumn:itemas:"string";];‘设置一个有四个数的表并作了一个0-3的循环'str="declare@x1varchar(20),@x2varchar(20),@x3varchar(20),@x4varchar(20)";str<<"execsp_getStatMsgTxt'status',";str<<(~modelrecall:"open_close");str<<",'flag',@x1output,@x2output,@x3output,@x4output";str<<"select@x1,@x2,@x3,@x4";‘拼凑execsp_getStatMsgTxt‘status',‘CH0JANCHSO10',1'Fflag',@x1output,@x2output,@x3output,@x4output;select@x1,@x2,@x3,@x4语句'selfsetSQL:str;AtrueEnd在cmxsql下执行上面所拼凑的语句得到的结果LabeISQLI中只有一个Trigger第一个TriggerStart中语句v_model中的showModel的Trigger中做(在面板开始的时候执行的语句,在的触发)**OBELMethod**Object:/VP_DEV_CNTL/v_sql_data_access/LabelSQLAuthor:Project:Date:TueJul2516:03:061995Note:ThismethodisexecutedwhentheStart/messageissentto:/VP_DEV_CNTL/v_sql_data_access/LabelSQLmethodTriggeronmsg:msgbeginIstr|0to:3do:[:item|selfbindColumn:itemas:"string";];str="declare@x1varchar(20),@x2varchar(20),@x3varchar(20),@x4varchar(20)";str<<"execsp_getStatMsgTxt'status',";str<<(~modelrecall:"sam");str<<",'flag',@x1output,@x2output,@x3output,@x4output";str<<"select@x1,@x2,@x3,@x4";selfsetSQL:str;‘方法同上面的一致'AtrueendLabelSQL2中只有一个Trigger第一个TriggerStart中语句(在面板开始的时候执行的语句,在v_model中的showModel的Trigger中做的触发)**OBELMethod**Object:/VP_DEV_CNTL/v_sql_data_access/LabelSQLAuthor:Project:Date:TueJul2516:03:061995Note:ThismethodisexecutedwhentheStart/messageissentto:/VP_DEV_CNTL/v_sql_data_access/LabelSQLmethodTriggeronmsg:msgbegin|str|0to:3do:[:item|selfbindColumn:itemas:"string";];str="declare@x1varchar(20),@x2varchar(20),@x3varchar(20),@x4varchar(20)";str<<"execsp_getStatMsgTxt'status',";str<<(~modelrecall:"rov");str<<",'flag',@x1output,@x2output,@x3output,@x4output";str<<"select@x1,@x2,@x3,@x4";selfsetSQL:str;AtrueEndZSO中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/ZSOAuthor:Project:Date:WedNov0218:36:182005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/DBLS7—————methodTriggeronmsg:msgbegin|str|str=selfgetText;‘获取控件Rttext的值'(strisSubStr:"open")‘判断它的值是否为”open”'ifTrue:[~v_button_icon/opensetInactiveBitmap:"green";给v_button_icon/open控件的nactiveBitmap的颜色为绿色’~v_button_icon/closedsetInactiveBitmap:"white";];(strisSubStr:"closed")ifTrue:[~v_button_icon/opensetInactiveBitmap:"white";~v_button_icon/closedsetInactiveBitmap:"green";];(strisSubStr:"error")ifTrue:[~v_button_icon/opensetInactiveBitmap:"white";~v_button_icon/closedsetInactiveBitmap:"white";];(strisSubStr:"transit")ifTrue:[~v_button_icon/opensetInactiveBitmap:"green";~v_button_icon/closedsetInactiveBitmap:"green";];‘和上面的大同小意,没有做过多的解释'AtrueEndSAM中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/DBLSAuthor:Project:Date:WedNov0218:36:182005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/DBLS7—————methodTriggeronmsg:msgbegin|str|str=selfgetText;(strisSubStr:"open")ifTrue:[~v_button_icon/manlsetInactiveBitmap:"green";~v_button_icon/autosetInactiveBitmap:"white";];(strisSubStr:"closed")ifTrue:[~v_button_icon/manlsetInactiveBitmap:"white";~v_button_icon/autosetInactiveBitmap:"green";];(strisSubStr:"error")ifTrue:[~v_button_icon/manlsetInactiveBitmap:"white";~v_button_icon/autosetInactiveBitmap:"white";];(strisSubStr:"transit")ifTrue:[~v_button_icon/manlsetInactiveBitmap:"green";~v_button_icon/autosetInactiveBitmap:"green";];AtrueEndXA中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/DBSAuthor:Project:Date:WedNov0219:00:352005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/DBS7—————methodTriggeronmsg:msgbegin|str1|str1=selfgetText;(str1isSubStr:"open")ifTrue:[~v_button_icon/faultsetInactiveBitmap:"white";]ifFalse:[(str1isSubStr:"closed")ifTrue:[~v_button_icon/faultsetInactiveBitmap:"red";]ifFalse:[~v_button_icon/faultsetInactiveBitmap:"white";];];AtrueEndRON中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/DBLSAuthor:Project:Date:WedNov0218:36:182005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/DBLS7—————methodTriggeronmsg:msgbegin|str|str=selfgetText;(strisSubStr:"open")ifTrue:[~v_button_icon/mt1setInactiveBitmap:"red";~v_button_icon/mt2setInactiveBitmap:"white";]ifFalse:~v_button_icon/mt1setInactiveBitmap:"white";~v_button_icon/mt2setInactiveBitmap:"green";];AtrueEndXSO中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/DBLSAuthor:Project:Date:WedNov0218:36:182005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/DBLS7—————methodTriggeronmsg:msgbegin|str|str=selfgetText;(strisSubStr:"open")ifTrue:[~v_button_icon/openningsetInactiveBitmap:"green";~v_button_icon/closingsetInactiveBitmap:"white";];(strisSubStr:"closed")ifTrue:[~v_button_icon/openningsetInactiveBitmap:"white";~v_button_icon/closingsetInactiveBitmap:"green";];(strisSubStr:"error")ifTrue:[~v_button_icon/openningsetInactiveBitmap:"white";~v_button_icon/closingsetInactiveBitmap:"white";];(strisSubStr:"transit")ifTrue:[~v_button_icon/openningsetInactiveBitmap:"green";~v_button_icon/closingsetInactiveBitmap:"green";];AtrueEndZLR中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/DBFAUAuthor:Project:Date:WedNov0219:17:512005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/DBFAU7—————methodTriggeronmsg:msgbegin|str1|str1=selfgetText;(str1isSubStr:"closed")ifTrue:[~v_button_icon/localsetInactiveBitmap:"green";~v_button_icon/remotesetInactiveBitmap:"white";]ifFalse:[(str1isSubStr:"open")ifTrue:~v_button_icon/localsetInactiveBitmap:"white";~v_button_icon/remotesetInactiveBitmap:"green";ifFalse:[~v_button_icon/localsetInactiveBitmap:"white";~v_button_icon/remotesetInactiveBitmap:"white";];];AtrueEndDA中只有一个Trigger第一个TriggerUBEUpdate中语句(在控件所加的点有数值改变的时候执行的语句)**OBELMethod**Object:/VP_PUMP_CNTL_STOP/v_rt_text/BDAAuthor:Project:Date:WedNov0219:58:252005Note:ThismethodisexecutedwhentheUBEUpdate/messageissentto:/VP_PUMP_CNTL_STOP/v_rt_text/BDA7—————methodTriggeronmsg:msgbegin|str1|str1=selfgetText;(str1isSubStr:"open")ifTrue:[~v_button_icon/dasetInactiveBitmap:"red";]ifFalse:[(str1isSubStr:"closed")ifTrue:[~v_button_icon/dasetInactiveBitmap:"white";]ifFalse:~v_button_icon/dasetInactiveBitmap:"white";];AtrueEndv_button/execute_oneself中只有一个Trigger第一个TriggerLeftMouseButtonRelease中语句(在左键点击时执行的语句)**OBELMethod**Object:/VP_DEV_CNTL/v_button/executeAuthor:Project:Date:FriJun3015:45:351995Note:ThismethodisexecutedwhentheLeftMouseButtonRelease/messageissentto:/VP_DEV_CNTL/v_button/executemethodTriggeronmsg:msgbegin|devicestr|(~v_button/open_oneselfisPressed)如果v_button/open_oneself在按下的状态'ifTrue:[str=~v_sql_data_access/LabelSQLgetDataAtRow:0andColumn:1;把LabeISQL中包含的表中0行1列的数赋给str'~v_button/open_oneselfsetStateToReleased;使v_button/open_oneself按钮变为弹起状态'~v_rt_text/ZSOfnput:("COMMAND"+str);在v_rt_text/ZSO中所包含的点中输出命令'];(~v_button/close_oneselfisPressed)ifTrue:[str=~v_sql_data_access/LabelSQLgetDataAtRow:0andColumn:2;~v_button/close_oneselfsetStateToReleased;~v_rt_text/ZSOfnput:("COMMAND"+str);];AtrueEndv_button/execute中只有一个Trigger第一个TriggerLeftMouseButtonRelease中语句(在左键点击时执行的语句)**OBELMethod**Object:/VP_DEV_CNTL/v_button/executeAuthor:Project:Date:FriJun3015:45:351995Note:ThismethodisexecutedwhentheLeftMouseButtonRelease/messageissentto:/VP_DEV_CNTL/v_button/executemethodTriggeronmsg:msgbegin|devicestr|(~v_button/openisPressed)ifTrue:[str=~v_sql_data_access/LabelSQL1getDataAtRow:0andColumn:1;~v_button/opensetStateToReleased;~v_rt_text/SAMfnput:("COMMAND"+str);];(~v_button/closeisPressed)ifTrue:[str=~v_sql_data_access/LabelSQL1getDataAtRow:0andColumn:2;~v_button/closesetStateToReleased;~v_rt_text/SAMfnput:("COMMAND"+str);];AtrueEndv_button/execute_mt中只有一个Trigger第一个TriggerLeftMouseButtonRelease中语句(在左键点击时执行的语句)**OBELMethod**Object:/VP_DEV_CNTL/v_button/executeAuthor:Project:Date:FriJun3015:45:351995Note:ThismethodisexecutedwhentheLeftMouseButtonRelease/messageissentto:/VP_DEV_CNTL/v_button/executemethodTriggeronmsg:msgbegin|devicestr|(~v_button/set_mtisPressed)ifTrue:[str=~v_sql_data_access/LabelSQL2getDataAtRow:0andColumn:1;~v_button/set_mtsetStateToReleased;~v_rt_text/ROVfnput:("COMMAND"+str);];(~v_button/set_nmtisPressed)ifTrue:[str=~v_sql_data_access/LabelSQL2getDataAtRow:0andColumn:2;~v_button/set_nmtsetStateToReleased;~v_rt_text/ROVfnput:("COMMAND"+str);];AtrueEnd
本文档为【OBEL语言学习总结剖析】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: 免费 已有0 人下载
最新资料
资料动态
专题动态
is_270070
暂无简介~
格式:doc
大小:164KB
软件:Word
页数:21
分类:
上传时间:2019-09-18
浏览量:10