TextSubParseTextSub Example

InstallShield 2020 » InstallScript Language Reference

/*--------------------------------------------------------------*\

*

* InstallShield Example Script

*

* Demonstrates the TextSub* functions: TextSubSetValue,

* TextSubSubstitute, TextSubGetValue, and TextSubParseTextSub.

*

\*--------------------------------------------------------------*/

 

function OnBegin( )

    string svString, svValue;

begin

    TextSubSetValue ( "<MYTEXTSUB1>", "First Text Sub", FALSE );

    svString = "Text <MYTEXTSUB1> String";

    TextSubSubstitute ( svString, FALSE );

    MessageBox( svString, INFORMATION );

    // svString is "Text First Text Sub String"

 

    TextSubSetValue ( "<MYTEXTSUB2>", "Second Text Sub <MYTEXTSUB1>", FALSE );

    TextSubGetValue ( "<MYTEXTSUB2>", svValue, FALSE, TRUE );

    MessageBox( svValue, INFORMATION );

    // svValue is "Second Text Sub First Text Sub"

    TextSubGetValue ( "<MYTEXTSUB2>", svValue, FALSE, FALSE );

    MessageBox( svValue, INFORMATION );

    // svValue is "Second Text Sub <MYTEXTSUB1>"

 

    svString = "Text <MYTEXTSUB1> String";

    TextSubParseTextSub ( svString );

    MessageBox( svString, INFORMATION );

    // svString is "MYTEXTSUB1"

end;