2. Tc2_System

2.13. 如何判断两个字符串是否相同?

可以间接使用MEMCMP指令:

FUNCTION StringCMP : BOOL 

VAR_INPUT

str1 : STRING;

str2 : STRING;

END_VAR

VAR

END_VAR


IF (MEMCMP(ADR(str1),ADR(str2),MAX(TO_UDINT(LEN(str1)),TO_UDINT(LEN(str2)))) = 0) THEN

StringCMP := TRUE;

ELSE

StringCMP := FALSE;

END_IF

余洋 2024.10.30 编辑