StrUtils.LeftStr、StrUtils.RightStr - 提取左右字符串

举例:

---

var
  ss,s: string;
begin
  ss := 'CodeGear Delphi 2007';
  s := RightStr(ss,4);
  ShowMessage(s);  {2007}

  s := LeftStr(ss,4);
  ShowMessage(s);  {Code}
end;

StrUtils 单元下的公用函数目录

---

posted on 2008-03-31 21:47  万一  阅读(6674)  评论(0)  编辑  收藏