GetStyledWords ( text ; style )

Returns all the styled words ( in list view ) within the given text

Average rating: 4.0 (38 votes) Log in to vote

Daniele Raybaudi - Show more from this author
ACI
http://www.aci.it

Sample input:

GetStyledWords ( "I'm going ( bold ) to learn English ( bold )" ; "bold" )

GetStyledWords ( "I'm going ( bold ) to learn English ( bold )" ; "" )

Sample output:

going
English

I'm
to
learn

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/*
GetStyledWords custom function

2007/03/08 revision 1: now finds plain text, too.


Author: Daniele Raybaudi

Format: GetStyledWords ( text ; style )

Parameters:
text - the given text where there are some styled words
style - the style to search for ; if it is empty the function will search for "plain"

Returns all the  styled words ( in list view ) within the given text

Example 1):
text = I'm going ( bold ) to learn English ( bold )
GetStyledWords ( text ; "bold" ) returns:
going
English

Example 2):
text = I'm going ( bold ) to learn English ( bold )
GetStyledWords ( text ; "" ) or GetStyledWords ( text ; "plain" ) returns:
I'm
to
learn

*/
Let ( [
style = If ( IsEmpty ( style ) or style = "plain" ; "\"\"" ; style ) ;
svg = GetAsSVG ( text ) ;
parseSVG = MiddleValues ( svg ; 2 ; PatternCount ( svg ; "Style#" ) ) ;
nextSVG = RightValues ( svg ; ValueCount ( svg ) - 2 ) ;
line = GetValue ( parseSVG ; 1 );
pos1 = GetAsNumber ( Middle ( line ; Position ( line ; "," ; 1 ; 1 ) + 1 ; Position ( line ; "," ; 1 ; 2 ) - Position ( line ; "," ; 1 ; 1 ) - 1  ) ) ;
pos2 = GetAsNumber ( Middle ( line ; Position ( line ; "," ; 1 ; 2 ) + 1 ; Position ( line ; "<" ; 1 ; 2 ) - Position ( line ; "," ; 1 ; 2 ) - 1  ) ) ;
string = Middle ( text ; pos1 ; pos2 - pos1 + 1 );
adjString = Substitute ( TrimAll ( Substitute ( Middle ( text ; pos1 ; pos2 - pos1 + 1 )  ; ¶ ; " " ) ; 1; 1 ) ; " " ; ¶ ) ;
next = Trim ( Middle ( text ; Length ( string ) + 1 ; Length ( text )  ) )
] ;
Case ( 
PatternCount ( nextSVG ; style ); 
Case(
PatternCount ( line ; style )  ; adjString & ¶ & GetStyledWords ( next ; style );
GetStyledWords ( next ; style )
);
Case(
PatternCount ( line ; style ); adjString ;
""
)
)
)

GetStyledWords custom function

revision 1: now finds plain text, too.

Author: Daniele Raybaudi

Format: GetStyledWords ( text ; style )

Parameters:
text - the given text where there are some styled words
style - the style to search for ; if it is empty the function will search for "plain"

Returns all the styled words ( in list view ) within the given text

Example 1):
text = I'm going ( bold ) to learn English ( bold )
GetStyledWords ( text ; "bold" ) returns:
going
English

Example 2):
text = I'm going ( bold ) to learn English ( bold )
GetStyledWords ( text ; "" ) or GetStyledWords ( text ; "plain" ) returns:
I'm
to
learn

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

GetStyledWords ( text ; style )

Comments

Support this website.

Support this website.