background image

   S := 'I Love China!';
  //下面将获取 I Love China

中的 Love”字符串。

  MyStr :=Copy(S, 3, 4);
  end;
  执行结果,MyStr

等于 Love” “

, Love”

字符串在 I Love China!”中第 3 个位置开始,所以第二个参

数为 3 “

, Love”一共有 4 个字符,所以第三个参数为 4。

  2.Concat
  功能说明:连接两个或多个字符串为一个字符串。
  参考实例:
  var
   S1, S2: String;
  begin
   S1 := Concat('A', 'B'); // 连接两个字符串,S1 变量等于 AB。
   S2 := Concat('Borland', ' Delphi', ' 7.0'); // 连接三个字符,S2 变量等于 Borland Delphi 7.0。
  end;
  3.Delete
  功能说明:删除字符串中指定的字符串。该函数有三个参数。第一个参数为要进行处理的字符串,
第二个参数为从何处开始删除,第三个参数为删除的字符个数。
  参考实例:
  var
   S: String;
  begin
   S := 'I Like Reading CPCW.'; 
   // 下面的代码将删除 S

变量中的 C”字符。

   Delete(S, 16, 1);
  end;
  此时 S 变量则是 I Like Reading PCW.(“C”已经不存在了)。
  4.High
  功能说明:返回数组下标的最大值。
  参考实例:
  var
   arrText: array[0..9] of Char;
   i: Integer;
  begin
   i := High(arrText); // i 的值则为 9
  end;
  5.Insert
  功能说明:插入一个字符(串)。该函数有三个参数。第一个参数为要插入的字符(串),第二个参数
为被插入字符串(源字符串),第三个参数为从何处插入。
  参考实例:
  var
   S: String;
  begin
   S := 'Wat is your name?';
   // 上面句子中的 What

单词查一个 h”字符,下面使用 Insert 函数将 h 添加进去。

   Insert('h', S, 2); //  “

将 h”从第 2 位处插入。

  end;
  6.LeftStr(所在单元:StrUtils)
  功能说明:返回字符串左边指定个数的新字符(串)。该函数有两个参数。第一个参数为完整的字符
串,第二个参数为指定个数。
  参考实例: