Delphi StrUtils-字符串函数RightStr、MidStr、LeftStr
2021-03-05 07:25
标签：字符串函数 utils 更新时间 phi size 字符串 pre ring font Delphi StrUtils-字符串函数RightStr、MidStr、LeftStr 引用单元：StrUtils 函数原型： 示例： 创建时间：2020.05.18 更新时间： Delphi StrUtils-字符串函数RightStr、MidStr、LeftStr 标签：字符串函数 utils 更新时间 phi size 字符串 pre ring font 原文地址：https://www.cnblogs.com/guorongtao/p/12909590.htmlfunction RightStr
(Const Str: String; Size: Word): String;
begin
if Size > Length(Str) then Size := Length(Str) ;
RightStr := Copy(Str, Length(Str)-Size+1, Size)
end;
--------------------------------------
function MidStr
(Const Str: String; From, Size: Word): String;
begin
MidStr := Copy(Str, From, Size)
end;
--------------------------------------
function LeftStr
(Const Str: String; Size: Word): String;
begin
LeftStr := Copy(Str, 1, Size)
//假设字符串 sStr := ‘Delphi is the Good‘， 那么
LeftStr(sStr, 5); // ‘Delph‘
MidStr(sStr, 5, 8); // ‘hi is the‘
RightStr(sStr, 6); // ‘e Good‘
上一篇：C# 单例推荐方式
文章标题：Delphi StrUtils-字符串函数RightStr、MidStr、LeftStr
文章链接：http://soscw.com/index.php/essay/60337.html