2008 年 3月 25 日随笔档案 - 万一

2008年3月25日

摘要： procedure Insert( Substr: String; {要插入的字符串; 可以是常量} var Dest: String; {源字符串} Index: Integer {从第几个字符前插入} ); 举例: var ss,s: WideString; begin ss := '万一的博客'; s := ' Delphi '; Insert(... 阅读全文

posted @ 2008-03-25 23:19 万一阅读(5578) 评论(2) 推荐(1)

System.Delete - 从字符串中删除

摘要： procedure Delete( var S: String; {源字符串; 因为是 var 参数, 不可能是个常量} Index: Integer; {起始位置; 第一个字符的位置是 1, 起始位置不能小于 1 } Count: Integer {要删除的字数} ); 举例: var s: string; begin s := 'Delphi 2007'; ... 阅读全文

posted @ 2008-03-25 23:03 万一阅读(4508) 评论(0) 推荐(0)

System.Copy - 从字符串或数组中复制

摘要： function Copy( S: String; {字符串或动态数组} Index: Integer; {起始位置} Count: Integer {Copy 个数} ): String; {如果参数 S 是动态数组, 这里也应该返回动态数组} 举例: //从字符串中提取 var ss,s: string; begin ss := 'Code... 阅读全文

posted @ 2008-03-25 14:03 万一阅读(8122) 评论(6) 推荐(0)