[fpc-pascal] Split and Join

[Mattias Gaertner]

On Fri, 27 Nov 2009 20:11:25 +0100 (CET)
Michael Van Canneyt <michael at freepascal.org> wrote:

> 
> 
> On Fri, 27 Nov 2009, Juha Manninen wrote:
> 
> > Hi,
> >
> > FPC's strutils or other libraries still don't have functions for splitting a
> > string to a list and joining a list of strings again to one string, given a
> > delimiter as a parameter.
> > Something like:
> >  function Spit(Str: string; Delim: string; Result: TStringList): integer;
> > and
> >  function Join(List: TStringList; Delim: string): string;
> 
> Of course it does exist. Split can be implemented like this:
> 
> List:=TStringList.Create;
> List.Delimiter:=Delim;
> List.StrictDelimiters:=True;
> List.DelimitedText:=Str;
> 
> And that's it.

Many other languages can do that in one line with their RTL.

Maybe as a special constructor.

List:=TStringList.CreateFromSplit(SomeText,Delim);


Mattias