[SOLVED] What's the problem with this?

[egsuh]

I'm trying to use TStringHelper.split, but ExcludeEmpty is not identified.

Code: Pascal  [Select][+][-]

1. procedure TForm1.Button1Click(Sender: TObject);
2. var
3.   s: string;
4.   slist: array of string;
5.   ti : integer;
6. begin
7.    s := '$3$5$8';
8.    slist := s.split(['$'], ExcludeEmpty);  // this form is found in Delphi manual.
9.    slist := s.split(['$'], [ExcludeEmpty]);    // but neither works
10.  
11.    for ti := 0 to High(slist) do
12.       memo1.lines.add(slist[ti]);
13.    Finalize(slist);
14. end;          

BTW, should I write Finalize(slist) here?

[Bart]

It should be defined in unit SysUtils (see: https://www.freepascal.org/docs-html/rtl/sysutils/tstringsplitoptions.html).

Bart

[rvk]

Using this it works fine:

Code: Pascal  [Select][+][-]

1. slist := s.split(['$'], TStringSplitOptions.ExcludeEmpty);

ExcludeEmpty is defined with SCOPEDENUMS ON.

Code: Pascal  [Select][+][-]

1. {$SCOPEDENUMS ON}
2.   TStringSplitOptions = (None, ExcludeEmpty);
3. {$SCOPEDENUMS OFF}
4.  

So you need to use TStringSplitOptions.ExcludeEmpty.

[egsuh]

Alright. Thank you for your help.

[Thaddy]

I explained in the code I added to a previous question: note the remark about scoped enum...
http://forum.lazarus.freepascal.org/index.php/topic,42351.msg295482.html#msg295482.