首页 > Windows开发 > 详细

delphi截取指定字符空格或-符号前面 中间 后面字符串

时间:2016-07-23 17:59:15      阅读:641      评论:0      收藏:0      [点我收藏+]
 
Edit1.Text:=‘abcd-12ab-59cd‘;

procedure TForm1.Button1Click(Sender: TObject);

var
  List: TStringList;
begin
  List := TStringList.Create;
  List.Delimiter := ‘-‘;
  List.DelimitedText :=Trim(Edit1.Text);
  ShowMessage(IntToStr(List.Count)); //2
  ShowMessage(List[0]); //abcd
  ShowMessage(List[1]); //12ab
  ShowMessage(List[2]); //12ab
 
  List.Free;
end;

 

delphi截取指定字符空格或-符号前面 中间 后面字符串

原文:http://www.cnblogs.com/lantianhf/p/5698967.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!