文章目录
- 需求
- 研究
- 结果
需求
在前面的【CodeSys开发3d机械臂显示控件】中，我们已经实现了一个可以显示3d模型的控件。但是这个控件是和使用的3d模型绑定死的，在安装这个控件时就已经将模型文件于控件一起安装到codesys中。
假如我想在不同的工程中，对这个控件动态地指定不同的模型，该怎么实现？
研究
首先，不同的工程，把不同的模型文件包含进来是没问题的，因为codesys本身就支持导入文件资源到工程：
导入进来的文件也可以进行读、写、复制、删除等操作，【CODESYS开发教程10-文件读写（SysFile库）】。
然后，我们到PLC中的网页控件页面看看，路径为PlcLogic/visu：
前面创建3d控件时，我们提到获取模型文件的二进制数据是利用window.CDSWebVisuAccess.getBinaryFile这个函数来实现的，而这个函数会根据输入的原始的文件名去查找实际的文件名。那原始文件名和实际文件名的对应关系在哪里呢？
在这个application.nativeelements.json文件中
好。先总结一下我们掌握的信息：
1.可以将文件拷贝到PLC中
2.IEC代码可以实现对PlcLogic文件夹中的任意文件进行操作（读、写、删除、复制等）
3.在html控件中访问文件只能通过固定的接口进行。
4.html控件的原始文件名与实际文件名可查。
那么，基于以上事实，我们可以这样实现我们动态更换3D控件的模型：
1.控件使用一个默认模型，假设文件名为myRobot.glb
2.在IEC代码中，通过读取application.nativeelements.json文件的内容，查找myRobot.glb对应的是哪个文件，假设是myRobot123.glb。
3.在IEC代码中，将我们下载到PLC的，准备用来替换原来模型的新模型文件newRobot.glb，拷贝覆盖到原来的模型myRobot123.glb(注意保留myRobot123.glb这个名字，也就是内容覆盖，但是名字不变)。
这样，html控件在加载模型时，就会按照文件路径来加载数据，从而加载了新模型。
下面这个是经过测试的代码：
这个是函数代码。
FUNCTION ReplaceRobotModel : UDINT
VAR_INPUT
modelFile : STRING(128);
END_VAR
VAR_OUTPUT
END_VAR
VAR
hFile : SysTypes.RTS_IEC_HANDLE;//句柄
iecResult : SysTypes.RTS_IEC_RESULT;//记录函数执行的结果
udiSize : LWORD; //用来存储文件的大小
udiRead : __XWORD;
configFileName : STRING(128) := 'visu/application.nativeelements.json';
jsonText : STRING(65535) := '';
startIndex, endIndex : INT;
targetKey : STRING := 'zygeneralrobot.glb';
targetValue : STRING(128);
targetFile : STRING(128) := 'visu/';
udiCopied : __XWORD;
cpResult : RTS_IEC_RESULT;
END_VAR
-------
// 文件的操作 https://blog.csdn.net/halps/article/details/128974489
targetValue := configFileName;
hFile := SysFileOpen(szFile:=configFileName, am:=SYSFILE.AM_READ , pResult:=ADR(iecResult));
IF hFile = RTS_INVALID_HANDLE THEN
ReplaceRobotModel := -1;
RETURN;
END_IF
//hFile不是无效句柄，说明成功打开文件
//SysFileGetSize函数获取文件的大小，并将结果存储在udisize变量中
udisize := SysFileGetSize(szFileName:=configFileName, pResult:=ADR(iecResult));
//将文件中的内容读取到指定的缓冲区中。成功读取时，将返回udiRead表示实际读取的字节数，失败时将返回错误代码，并将错误状态存储在iecResult变量中。
//pbyBuffer是用于存储读取内容的缓冲区
//ulSize是要读取的字节数
//pResult: 这是指向结果的指针，用于接收操作的结果状态。
udiRead := SysFileread(hFile:=hFile, pbyBuffer:=ADR(jsonText), ulSize:=udiSize, pResult:=ADR(iecResult));
//关闭文件
iecResult := SysFileClose(hFile:=hFile);
startIndex := strfindA(ADR(jsonText), ADR(targetKey), 0) + len(targetKey) + 4; // 添加引号和冒号的长度
endIndex := strfindA(ADR(jsonText), ADR('"'), startIndex) - 1; // 找到下一个引号的位置，减去1得到值的末尾
IF startIndex > 0 AND endIndex > 0 THEN
strMidA(ADR(jsonText), 65535, endIndex - startIndex + 1, startIndex, ADR(targetValue), 255);
END_IF;
// 复制替换文件
StrConcatA(ADR(targetValue), ADR(targetFile), 128);
cpResult := SysFileCopy(targetFile, modelFile, ADR(udiCopied));
ReplaceRobotModel := cpResult;
RETURN;
调用。里面的’Application/robotArm.glb’就是新模型存放的位置。
PROGRAM READ_PRG
VAR
modelFileReplaced : BOOL := FALSE;
replaceFileResult : UDINT := -123;
END_VAR
------
IF modelFileReplaced = FALSE THEN
modelFileReplaced := TRUE;
replaceFileResult := ReplaceRobotModel(modelFile:= 'Application/robotArm.glb');
END_IF
结果
一番操作后，成功了50%。
意思是：在通过浏览器访问（http://127.0.0.1:8080）PLC的界面时，3d控件中的模型的确是新的模型；但是在CodeSys的编程软件的Visualization页面，显示的还是旧的模型。
不知道为啥。无论在visu中覆盖什么文件，甚至把这个visu文件夹都删除掉，都影响不了Visualization页面。
这应该就说明了，这个Visualization页面，应该是有一个独立的文件夹，但是不知道在哪里。哪怕我用everything来搜关键文件，都没有搜到。
当我用不同的模型时，编译出来的Application.app、Application.core、Application.crc的大小并没有明显的变化，所以资源应该没有被直接编译进文件中。神奇，真相究竟藏在哪里？
之前试过将模型数据编码成base64字符串，然后将字符串变量发送给html控件的，成功了100%，但是，传输的时间太长，20M的模型都要几分钟，感觉鸡肋。有兴趣的可以看看这里：【CodeSys中将文件读取并进行base64编码后存放于string】
参考：
【CODESYS开发教程10-文件读写（SysFile库）】
