Monkeybread Software - MBS FileMaker Plugin: Text Wrap

Components	All	New	MacOS		Windows		Linux		iOS
Examples	Mac & Win		Server	Client	Guides	Statistic	FMM	Blog	Deprecated	Old

MBS FileMaker Plugin Example Databases

Text Wrap

All examples are included with download of MBS FileMaker Plugin.

Text Wrap.fmp12

Overview
Tables	1
Relationships	0
Layouts	1
Scripts	1
Value Lists	1
Custom Functions	1
Custom Menus	24

File Options
Default custom menu set	[Standard FileMaker Menus]
When opening file
Minimum allowed version	12.0
Login using	Account Name; Account= Admin
Allow user to save password	Off
Require iOS passcode	Off
Switch to layout	Off
Hide all toolbars	Off
Script triggers
OnFirstWindowOpen	Off
OnLastWindowClose	Off
OnWindowOpen	Off
OnWindowClose	Off
OnFileAVPlayerChange	Off
Thumbnail Settings
Generate Thumbnails	On; Temporary

Tables

Table Name	Statistics	Occurrences in Relationship Graph
Text	10 fields defined, 3 records	Text

Fields

Table Name: Text - 10 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
InputText	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
OutputText	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
Font Path	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
Font Size	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
Max Line Length	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
Max Character per Line	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
Divider	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text		Split
CALC INPUT TEXT	Calculated, Text	Calculation: Context table: Text TextFont ( TextSize ( Text::InputText ; Text::Font Size ) ; Text::Font ) Auto-Enter: Always evaluate Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text
Font	Calculated, Text	Calculation: Context table: Text GetFontName ( Text::Font Path ) Auto-Enter: Always evaluate Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text
CALC OUTPUT TEXT	Calculated, Text	Calculation: Context table: Text TextFont ( TextSize ( Text::OutputText ; Text::Font Size ) ; Text::Font ) Auto-Enter: Always evaluate Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		Text

Layout Objects: Text

Regular Fields

Field Name: Text::InputText

Layout Name:

Text

Top: 100 pt
Left: 138 pt
Bottom: 309 pt
Right: 456 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::OutputText

Layout Name:

Text

Top: 318 pt
Left: 138 pt
Bottom: 527 pt
Right: 456 pt

Anchoring: Left, Top and Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::Font Path

Layout Name:

Text

Top: 529 pt
Left: 138 pt
Bottom: 550 pt
Right: 477 pt

Anchoring: Left, Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::Font Size

Layout Name:

Text

Top: 552 pt
Left: 138 pt
Bottom: 573 pt
Right: 391 pt

Anchoring: Left, Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::Max Line Length

Layout Name:

Text

Top: 575 pt
Left: 138 pt
Bottom: 596 pt
Right: 881 pt

Anchoring: Left, Bottom

Field Format:

Radio Button Set
Display values from: Lengths

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::Divider

Layout Name:

Text

Top: 598 pt
Left: 138 pt
Bottom: 619 pt
Right: 391 pt

Anchoring: Left, Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::Max Character per Line

Layout Name:

Text

Top: 621 pt
Left: 138 pt
Bottom: 642 pt
Right: 217 pt

Anchoring: Left, Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::CALC INPUT TEXT

Layout Name:

Text

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1367 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::Font

Layout Name:

Text

Top: 529 pt
Left: 479 pt
Bottom: 550 pt
Right: 621 pt

Anchoring: Left, Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Yes

Field Name: Text::CALC OUTPUT TEXT

Layout Name:

Text

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1367 pt

Anchoring: Left, Top and Bottom

Field Format:

Edit Box

Field Behavior:

Allow field to be entered: In Find mode, In Browse mode
Touch keyboard type: Default for Data Type
Go to next field using: Tab key

Type:

Text: Set

Layout Name:

Text

Top: 611 pt
Left: 425 pt
Bottom: 642 pt
Right: 504 pt

Anchoring: Left, Bottom

Perform Script [ “Split” ]

Scripts:

Split

Graphic Objects

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 200 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 667 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 300 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 767 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 400 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 867 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 500 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 967 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 600 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1067 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 700 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1167 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 800 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1267 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 250 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 717 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 350 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 817 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 450 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 917 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 550 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1017 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 650 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1117 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 750 ; 0 ; 1 )

Top: 100 pt
Left: 467 pt
Bottom: 309 pt
Right: 1217 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 200 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 667 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 300 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 767 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 400 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 867 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 500 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 967 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 600 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1067 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 700 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1167 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 800 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1267 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 250 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 717 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 350 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 817 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 450 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 917 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 550 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1017 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 650 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1117 pt

Anchoring: Left, Top

Graphic Object Properties

Coordinates

Type:

Rectangle

Layout Name:

Text

Hide Condition:

If ( Text::Max Line Length = 750 ; 0 ; 1 )

Top: 318 pt
Left: 467 pt
Bottom: 527 pt
Right: 1217 pt

Anchoring: Left, Top

Value Lists

Value List Name	Source	Values	On Layouts
Lengths	Custom	200, 250, 300, 350, 400, 450, 500, 550, 600, 650, 700, 750, 800	Text

Script Hierarchy

Split

Script Name	Split
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	Text
Scripts that use this script
Script Definition
Script Steps	#This script sets the text to a certain line length #Parameters from fields Set Variable [ $MaxLineLength; Value:Text::Max Line Length ] Set Variable [ $MaxLineCharacters; Value:Text::Max Character per Line ] Set Variable [ $InputText; Value:Text::InputText ] Set Variable [ $Divider; Value:Text::Divider ] Set Variable [ $FontPath; Value:Text::Font Path ] Set Variable [ $FontSize; Value:Text::Font Size ] #Create dummy picture for measurement Set Variable [ $img; Value:MBS( "GMImage.New"; "200x200"; "white" ) ] Set Variable [ $r; Value:MBS( "GMImage.SetFontPointsize"; $img; $FontSize ) ] Set Variable [ $r; Value:MBS( "GMImage.SetFont"; $img; $FontPath ) ] #process new lines if exist in input text Set Variable [ $InputText; Value:Substitute($InputText; ¶&¶; Char(10)) ] Set Variable [ $InputText; Value:Substitute($InputText; ¶; " ") ] Set Variable [ $InputText; Value:Substitute($InputText; Char(10); ¶) ] Set Variable [ $Output; Value:"" ] Set Variable [ $LineCount; Value:ValueCount($InputText) ] Set Variable [ $Line; Value:1 ] If [ $Line ≤ $LineCount ] Loop #your script steps here Set Variable [ $Text; Value:GetValue($InputText; $Line) ] Set Variable [ $Text; Value:Substitute($Text; " "; ¶) ] #Start loop Set Variable [ $WordCount; Value:ValueCount($Text) ] Set Variable [ $WordIndex; Value:1 ] Set Variable [ $WordText; Value:"" ] Loop Set Variable [ $WordText; Value:GetValue($Text; $WordIndex) ] Set Variable [ $WordIndex; Value:$WordIndex + 1 ] #Lets see if we would fit in one more word Loop Exit Loop If [ $WordIndex > $WordCount ] #Get words Set Variable [ $NewWord; Value:GetValue($Text; $WordIndex) ] Set Variable [ $NewWordText; Value:$WordText & " " & $NewWord ] #Check if length would be to much and exit Exit Loop If [ Length($NewWordText) > $MaxLineCharacters ] #Measure size Set Variable [ $Metrics; Value:MBS( "GMImage.FontTypeMetrics"; $img; $NewWordText ) ] Set Variable [ $Width; Value:MBS( "Math.TextToNumber"; (GetValue($Metrics; 1))) ] If [ $Width < 1 ] Show Custom Dialog [ Title: "Width < 1 pixel?"; Message: "Font path is right?"; Default Button: “OK”, Commit: “Yes”; Button 2: “Abbrechen”, Commit: “No” ] Exit Script [ ] End If #Check if width would be to much and exit Set Variable [ $Width; Value:$width + 4 // a bit of margin added ] Exit Loop If [ $Width > $MaxLineLength ] #A word more could be good Set Variable [ $WordText; Value:$NewWordText ] Set Variable [ $WordIndex; Value:$WordIndex + 1 ] End Loop #Get the words we place here: Set Variable [ $Output; Value:$Output & If(Length($Output) > 0; $Divider; "") & $WordText ] #next Exit Loop If [ $WordIndex > $WordCount ] End Loop #next Set Variable [ $Line; Value:$Line + 1 ] Exit Loop If [ $Line > $LineCount ] Set Variable [ $Output; Value:$Output & ¶ ] End Loop End If #Cleanup Set Variable [ $r; Value:MBS( "GMImage.destroy"; $img) ] #Put result in Field Set Field [ Text::OutputText; $output ]
Fields used in this script	Text::Max Line Length Text::Max Character per Line Text::InputText Text::Divider Text::Font Path Text::Font Size Text::OutputText
Scripts used in this script
Layouts used in this script
Tables used in this script	Text
Table occurrences used by this script	Text
Custom Functions used by this script
Custom menu set used by this script

Custom Functions

Function Name	Parameters	Availability	Definition	In Field Definitions	In Scripts
GetFontName	Path	All accounts	Let ( [ CNT = PatternCount ( Path ; "/" ) ; STRT = Position ( Path ; "/" ; 1 ; CNT ) + 1 ; END = Middle ( Path ; STRT ; Length ( Path ) ) ; CNTE = PatternCount ( END ; "." ) ; DOT = Position ( END ; "." ; 1 ; CNTE ) - 1 ; ENDE = Left ( END ; DOT ) ] ; ENDE )	Text::Font

Custom Menu Sets

Menu Sets	Menus	In Scripts	In Layouts	Comments
[Standard FileMaker Menus]	All Standard Menus

Download example: Text Wrap

Used functions: