HiliteMentions ( text ; r ; g ; b )

Adds a highlight to @mention tags within text.

Be the first to rate this function Log in to vote

Richard Dyce - Show more from this author
Dyce & Sons Ltd.
http://dyce.com

Sample input:

HiliteMentions ( "A note for @mm ok? @gg." ; 102; 175; 255 )

Sample output:

"A note for _@mm_ ok? _@gg_." -- where text between underscores is highlighted

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

// HiliteMentions ( text ; r ; g ; b )

If(
	PatternCount ( text ; "@" ) = 0 ;

	// nothing left to highlight
	text ;

	// we have more @mentions to deal with	
	Let(
		[
			start = Position ( text ; "@" ; 1 ; 1 ) ;
			prefix = Left ( text ; start - 1 ) ;
			mention = "@" & LeftWords( Middle ( text ; start ; 64000 ) ; 1 ) ;
			end = start + Length( mention ) ;
			suffix = Middle ( text ; end ; 64000 )
		] ;

		// piece to hilite
		prefix &

		// piece before @sign
		TextColor ( TextStyleAdd ( mention ; Bold ) ; RGB ( r ; g ; b ) ) &

		// remainder of the text
		HiliteMentions( suffix ; r ; g ; b )
	)
)

Uses LeftWords to ensure @mentions shouldn't include punctuation marks. Exception to note: @big.word is treated as a complete mention. The function is recursive, but the stack should not grow beyond the total number of @ symbols in the string.

Comments

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

HiliteMentions ( text ; r ; g ; b )

Comments

Support this website.

Support this website.