摘要: 举例:var ss,s: string;begin ss := 'Delphi'; s := UpperCase(ss); ShowMessage(s); //DELPHI s := LowerCase(ss); ShowMessage(s); //delphiend; 阅读全文
posted @ 2013-05-28 20:52 万大侠 阅读(130) 评论(0) 推荐(0) 编辑
摘要: 举例:--------------------------------------------------------------------------------var ss,s: string;begin ss := '2007-2008'; s := StringReplace(ss,'00','x',[rfReplaceAll]); ShowMessage(s); //2x7-2x8 s := StringReplace(ss,'00','x',[rfIgnoreCase]); ShowMessage(s 阅读全文
posted @ 2013-05-28 20:51 万大侠 阅读(189) 评论(0) 推荐(0) 编辑
摘要: 举例:--------------------------------------------------------------------------------var ss,s: string;begin ss := ' Delphi '; s := Trim(ss); {删除两边空格} ShowMessage('^' + s + '$'); {^Delphi$} s := TrimLeft(ss); {删除左空格} ShowMessage('^' + s + '$'); {^Delphi $} s := T 阅读全文
posted @ 2013-05-28 20:24 万大侠 阅读(165) 评论(0) 推荐(0) 编辑
摘要: 该函数不区分大小写, 举例:--------------------------------------------------------------------------------var s: string; i: Integer;begin s := 'CodeDear Delphi'; i := LastDelimiter('Del',s); ShowMessage(IntToStr(i)); {12}end;----------------------------------------------------------------------- 阅读全文
posted @ 2013-05-28 20:12 万大侠 阅读(239) 评论(0) 推荐(0) 编辑
摘要: var s: string; b: Boolean;begin s := 'CodeDear Delphi'; b := IsDelimiter('de', s, 3); ShowMessage(BoolToStr(b)); {返回 -1, 就是 True}end;说明: b := IsDelimiter('de', s, 4); 返回也是{返回 -1, 就是 True} end; 其它为0 阅读全文
posted @ 2013-05-28 20:04 万大侠 阅读(225) 评论(0) 推荐(0) 编辑