基本数据类型与表达式6
让编程改变世界
Change the world by program
字符串处理函数与过程
（1）大小写转换函数
[调用格式1]：LowerCase(const s:String): String; [功能]：把字符串s 中的字符全部转换为小写字母，并作为函数值返回。 [例如] [codesyntax lang="delphi"]x1:= LowerCase(‘aBc’); // x1 的值为abc x2:= LowerCase(‘FISHc’); // x2的值为fishc[/codesyntax] [调用格式2]：UpperCase(const s:String): String; [功能]：把字符串s 中的字符全部转换为大写字母，并作为函数值返回。 [例如] [codesyntax lang="delphi"]
x1:= LowerCase(‘bCb’); // x1 的值为BCB x2:= LowerCase(‘FISHc’); // x2的值为FISHC[/codesyntax]
（2）比较字符串大小函数
[调用格式1]：CompareStr(const s1,s2:String): Integer; [功能]：比较两个字符串s1和s2的大小。 [说明]：- 大小比较的依据是ASCII 码值。根据字符的ASCII 码值，从两字符串的第一个字符开始比较，若前者大于后者，比较终止，返回值大于0；
- 若小于后者，比较也终止，返回值小于0；若等于后者，将接着继续比较后面的字符。直到遇到不相等的字符或s1或s2的所有字符均比较完毕。若
- 所有位置上的字符都相等，则返回值等于0。
x1:= CompareStr('Abc','abc'); //x1 的值为-32
x2:= CompareText('Abc','abc'); //x2 的值为0
[/codesyntax]
（3）求字符串长度函数
[调用格式]：Length(s): Integer; [功能]：返回字符串的长度。 [说明]：参数s 的类型为字符串型。 [例如]：x:= Length(‘Fishc'); //x的值为5（4）查找位置函数
[调用格式]：Pos(s1, s2): Integer; [功能]：返回子字符串s1在字符串s2中首次出现的位置，若s2中不存在s1，则返回0。 [说明]：若s1在s2中，则必须满足s1的所有字符都在s2中，即s1是s2的子串。 [例如]：x:= Pos('bc', 'abcd'); //x1 的值为2（5）合并字符串过程
[调用格式]：AppendStr(var s1; Const s2); [功能]：相当于执行语句“s1:= s1+s2;”。 [说明]：本过程比语句“s1:= s1+s2;”执行效率高。（6）截取子字符串函数
[调用格式]： Copy(str, m, n): String; [功能]：在字符串str 中截取从第 m 个字符开始长度为n 的子字符串，并作为函数的返回值。 [说明]：若m大于s 的长度，则返回一个空串；若从第m 个字符到s 的结尾不足n 个字符，则返回其间的所有字符。 [例如]： [codesyntax lang="delphi"]s1:= Copy( ‘IloveFishc！', 6, 5 ); // s1 的值为‘Fishc' s2:= Copy( ‘小甲鱼爱美眉！’, 4, 5 ); // s2 的值？ s3:= Copy( ‘IloveFishc！’, 1, 1 ); s4:= Copy( ‘IloveFishc！’, 0, 1);[/codesyntax] 注意：s3 和 s4 其实是一样的！
（7）删除子字符串过程
[调用格式]：Delete( str, m, n ); [功能]：在字符串str 中删除从第m个字符开始长度为n的子字符串。 [说明]：- 如果m大于str 的长度，则不删除任何字符；
- 如果从第m 个字符开始到str 的末尾不足n个字符，则删除其间的所有字符；
- 如果n小于等于0，则不删除任何字符。