Add more than 1 delimiter in TStringList

Question

This is my delimited text: $HEHDT,10.17,T*28$HEHDT,10.18,T*2A and so on...

The comma is my sentence delimiter. However, I want to use the asterisk as my delimiter as well.

Output I want to achieve is:

$HEHDT 10.17 T 28 $HEHDT 10.18 T 2A

How do I specify more than 1 sentence delimiter in delphi? This is the code I have so far.

var
  MyStringList: TStringList;
  i: Integer;
begin
  MyStringList:= TStringList.Create;

  MyStringList.Delimiter := ','
  MyStringList.DelimitedText := '$HEHDT,10.17,T*28'+#13#10 +'$HEHDT,10.18,T*2A' +#13#10;

  for i= 0 to MyStringList.Count-1 do
    ShowMessage(MyStringList[i]);

  MyStringList.Free;
end;

For the above code, it only takes the comma as delimiter. How do I include 2 delimiters, both the comma and the asterisk?

Many thanks in advance! =)

Answer 1

Delphi stringlist is nice enough to give you the ability to parse text on one delimiter "for free". If you want a set of delimiters - then you need to use StrUtils.SplitString:

http://docwiki.embarcadero.com/VCL/en/StrUtils.SplitString