Delphi 根据分割符只取最后的值

本文整理自网络，侵删。

 
function GetCharStr(charstr:Char;str: string): string;
var ts : TStrings;
begin

  ts := TStringList.create;
  try
    ts.Delimiter :=charstr;
    ts.DelimitedText := str;
    if ts.Count > 0 then
      Result := ts[ts.Count - 1]; //这里控制取值
  finally
    ts.Free;
  end;
end;
 

相关阅读 >>

Delphi 10.4.1的编译器bug终于修正了！

Delphi 获取上一次文件访问时间

Delphi trimleft 删除字符串左边的空格

Delphi 关于字符串的一些使用技巧

Delphi twebbrowser与嵌入youtube视频崩溃

Delphi 调用win32 api操作串口

Delphi 抓图后打印这张图片,弹出打印属性框

Delphi写入txt

Delphi 游戏是如何检测到有od等调试工具的

Delphi android调用授权管理打开通知监听服务

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 根据分割符只取最后的值