如何在西门子SCL中为VARIANT指向的间接寻址存储区添加运行时偏移量？

可以通过SCL内置的指针与VARIANT转换函数实现需求，无需依赖POKE系列函数，具体实现步骤如下：

核心思路 #

利用__TO_POINTER将VARIANT转换为通用字节指针，添加运行时偏移后，再通过__TO_VARIANT转换回VARIANT类型，即可直接传递该偏移后的参数。

代码示例 #

FUNCTION_BLOCK FB_ApplyVariantOffset
VAR_INPUT
    OriginalVariant: VARIANT;  // 原始VARIANT参数（指向目标存储区）
    ByteOffset: INT;           // 运行时定义的字节偏移量
END_VAR
VAR_OUTPUT
    OffsettedVariant: VARIANT; // 偏移后的VARIANT参数，可直接传递使用
END_VAR
VAR
    BytePtr: POINTER TO BYTE;
END_VAR

// 1. 将VARIANT转换为字节指针
BytePtr := __TO_POINTER(OriginalVariant);

// 2. 计算偏移后的指针（先检查原指针有效性，避免空指针操作）
IF BytePtr <> DWORD#0 THEN
    BytePtr := BytePtr + ByteOffset;
END_IF;

// 3. 将偏移后的指针转回VARIANT
OffsettedVariant := __TO_VARIANT(BytePtr);

关键注意事项 #

• 偏移量为字节单位：若需偏移特定数据类型（如INT、DINT），需根据类型长度计算偏移值（例如偏移1个INT需加2，偏移1个DINT需加4）。
• 地址合法性检查：必须确保偏移后的地址落在PLC合法存储区内（如I/Q/M/DB区），否则会触发访问错误。
• 版本兼容性：__TO_POINTER和__TO_VARIANT是TIA Portal V15及以上版本支持的内置函数，V17完全兼容。

内容的提问来源于stack exchange，提问作者Andrei Vukolov