数据类型:string
描述:字符串由一系列附上引号(“”)的字符(最多80个)组成,例如,“这是一个字符串”。如果字符串中包括引号,则必须保留两个引号,例如,“本字符串包含一个“”字符”。如果字符串中包括反斜线,则必须保留两个反斜线符号,例如,“本字符串包含一个\字符”。
示例:
以下示例介绍了数据类型string:
例 1
VAR string text;
...
text := "start welding pipe 1";
TPWrite text;
在FlexPendant示教器上写入文本start welding pipe 1。
注意事项:一个字符串可能拥有0到80个字符;包括额外的引号或反斜线。
一个字符串可能包含ISO 8859-1(Latin-1)规定的任意字符以及控制字符(非ISO
8859-1(Latin-1)字符,且数字代码介于0-255之间)。
有关写入到EXCLE中的示例:
1 PROC CreateNewRecord() 2 VAR string pathname; 3 VAR string filename; 4 Close ft_record; 5 pathname:=usbdisk1; 6 filename:="FT_Record_"+CDate()+"-"+CTime()+".xlsx"; 7 filename:=StrMap(filename,":","-"); 8 Open pathnameFile:=filename,ft_recordWrite; 9 ERROR 10 IF ERRNO=ERR_FILEOPEN THEN 11 Close ft_record; 12 TPWrite "Open error: USB not found."; 13 pathname:=diskhome; 14 TestNum:=FSSize(diskhomeFreeMbyte); 15 IF TestNum<50 THEN 16 TPWrite"control flash drive storage is insufficient. Please change mount USB"; 17 Stop; 18 ENDIF 19 RETRY; 20 ENDIF 21 ENDPROC
1 PROC RecordNow() 2 VAR num timeg; 3 VAR string message; 4 VAR string message1; 5 IF sampleNumber=1 THEN 6 TestNum:=FSSize(usbdisk1FreeMbyte); 7 IF TestNum<100 THEN 8 TPWrite"USB flash drive storage is insufficient. Please change USB"; 9 ENDIF 10 message:=CTime()+" Record:Force"+"9"+"ForceX"+"9"+"ForceY"+"9"+"ForceZ"+"9"+"TorqueX"+"9"+"TorqueY"+"9"+"TorqueZ"; 11 Write ft_record,messageNoNewLine; 12 message1:="9"+"PointX"+"9"+"PointY"+"9"+"PointZ"; 13 Write ft_record,message1; 14 ENDIF 15 message:=CTime()+"9"+NumToStr(Force_out_x,2)+"9"+NumToStr(Force_out_y,2)+"9"+NumToStr(Force_out_z,2)+"9"+NumToStr(Torque_out_x,2)+"9"+NumToStr(Torque_out_y,2)+"9"+NumToStr(Torque_out_z,2)+"9"+NumToStr(Point_out_x,2)+"9"+NumToStr(Point_out_y,2)+"9"+NumToStr(Point_out_z,2); 16 Write ft_record,message; 17 ERROR 18 IF ERRNO=ERR_FILEACC THEN 19 CreateNewRecord; 20 Write ft_record,"Write errorDA"; 21 RETRY; 22 ENDIF 23 ENDPROC