摘要: 这几个函数都包含在StrUtils中,所以需要uses StrUtils;假设字符串是 Dstr := ’Delphi is the BEST’, 那么LeftStr(Dstr, 5) := ’Delph’MidStr(Dstr, 6, 7) := ’i is th’RightStr(Dstr, 6) := ’e BEST’~~~~~~~~~~~~~~~~~~~~~~~~~function RightStr (Const Str: String; Size: Word): String;begin if Size > Length(Str) then Size := Length(Str 阅读全文
posted @ 2010-08-22 15:20 EasyPass 阅读(3665) 评论(0) 推荐(0) 编辑