Array Delimiter

Hi guys

I want to split an array into multiple parts

with the properties symbol, for example |

A:String;

 A := 'Test|Test2';SplitText('|');

Memo1=(A[1])

Memo2=(A[2])

I declare a string variable but I can't parse it

I think I went the wrong way

Please help, thank you

Comments

  • Set CommaText for TStrings

  • edited January 2024

    Set CommaText for TStrings

    It does not answer, the letters are displayed as single characters

  • edited January 2024

    Set CommaText for TStrings

    The code I wrote

    procedure Memo1OnBeforePrint(Sender: TfrxComponent);

    var

    A:TStringList;   

    begin

    A.CommaText:= 'Cat,Dog,Mouse'; 

    Memo1.Text:=(A[1]); 

    Memo2.Text:=(A[2])   

    Memo3.Text:=(A[3]) 

    end;

    begin

    end.

Leave a Comment