| 作者 | 主题 |
|---|---|
|
猪仔天上飞 游民 经验值:141 发帖数:125 精华帖:0 |
楼主
主题:斑竹帮我看看
往msflexgrid 里面写东西
char *sRet; sRet=SysMalloc(20); SetPropWord("canshu.pdl","控件6","row",1); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%04X",GetTagByte("CIn.C_In")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",2); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%04X %04X",GetTagWord("SOut.SOut_1"),GetTagWord("SOut.SOut_2")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",3); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%04X %04X %04X %04X %04X",GetTagWord("InPlc.In1"),GetTagWord("InPlc.In2"),GetTagWord("InPlc.In3"),GetTagWord("InPlc.In4"),GetTagWord("InPlc.In5")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",4); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%04X %04X %04X %04X %04X",GetTagWord("OutPlc.Out1"),GetTagWord("OutPlc.Out2"),GetTagWord("OutPlc.Out3"),GetTagWord("OutPlc.Out4"),GetTagWord("OutPlc.Out5")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",5); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%d",GetTagWord("OutPlcPeel.R_Peel_Clamp")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",6); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%d",GetTagWord("OutPlcPeel.R_Peel_Torque")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",7); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%d",GetTagWord("OutPlcSpeed.R_Move_Speed")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",8); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%d",GetTagWord("OutPlcSpeed.R_Rotate_Speed")); SetPropChar("canshu.pdl","控件6","Text",sRet); SetPropWord("canshu.pdl","控件6","row",9); SetPropWord("canshu.pdl","控件6","col",1); sprintf(sRet,"%08X %08X %08X",GetTagDWord("Aux.Token"),GetTagDWord("Run.Token1"),GetTagDWord("Run.Token2")); SetPropChar("canshu.pdl","控件6","Text",sRet); //Return-Type: BOOL return 1; 这个是代码。。为什么启动项目的时候没有问题。我关了以后重新进脚本编辑。点击确定后。。弹出对话框提示脚本出现问题了?
努力学好PLC
|
|
有谁共鸣 侠圣 经验值:3112 发帖数:2153 精华帖:21 |
楼
主题:回复:斑竹帮我看看
你这个好象行不通的吧!
我刚刚测试如下的代码给你参考: #define GetObject GetObject __object *pdl=NULL; __object *pic=NULL; __object *obj=NULL; int i,j; pdl = __object_create("PDLRuntime"); pic=pdl->GetPicture(lpszPictureName); obj=pic->GetObject("MSFlexGrid"); obj->Rows=6; obj->Cols=6; obj->Row=0; obj->Col=0; obj->Text="参数名称"; obj->Row=0; obj->Col=1; obj->Text="参数1"; obj->Row=0; obj->Col=2; obj->Text="参数2"; obj->Row=0; obj->Col=3; obj->Text="参数3"; obj->Row=0; obj->Col=4; obj->Text="参数4"; obj->Row=0; obj->Col=5; obj->Text="参数5"; for(i=1;i<6;i++) { obj->Row=i; obj->Col=0; obj->Text=i; } for(i=1;i<6;i++) for(j=1;j<6;j++) { obj->Row=i; obj->Col=j; obj->Text=i*j; } __object_delete(obj); __object_delete(pic); __object_delete(pdl); 同时附上画面文件(canshu.pdl) 点击此处查看附件
雄关漫道真如铁,而今迈步从头越!
|