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

 

Edit1.Text:='abcd-12ab-59cd'; Edit1.Text:='abcd-12ab-59cd';