Monkeybread Software - MBS FileMaker Plugin: MouseWheel scrolling through records

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

MBS FileMaker Plugin Example Databases

MouseWheel scrolling through records

All examples are included with download of MBS FileMaker Plugin.

MouseWheel scrolling through records.fmp12

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

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	Script: Start
OnLastWindowClose	Off
OnWindowOpen	Off
OnWindowClose	Off
OnFileAVPlayerChange	Off
Thumbnail Settings
Generate Thumbnails	On; Temporary

Tables

Table Name	Statistics	Occurrences in Relationship Graph
MouseWheel scrolling through records	3 fields defined, 32 records	MouseWheel scrolling through records

Fields

Table Name: MouseWheel scrolling through records - 3 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
Test Field	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		MouseWheel scrolling through records
RecordID	Calculated, Number	Calculation: Context table: MouseWheel scrolling through records Get ( RecordID ) Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		MouseWheel scrolling through records
ScriptCalls	Normal, Number	Auto-Enter: Allow editing Validation: Only during data entry Storage: Global Repetitions: 1 Index Language: German		MouseWheel scrolling through records		MouseTrigger Start

Layout Objects: MouseWheel scrolling through records

Regular Fields

Field Name: MouseWheel scrolling through records::Test Field

Layout Name:

MouseWheel scrolling through records

Top: 52 pt
Left: 138 pt
Bottom: 503 pt
Right: 537 pt

Anchoring: Left, Top

Field Format:

Edit Box
Include vertical scrollbar

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: MouseWheel scrolling through records::RecordID

Layout Name:

MouseWheel scrolling through records

Top: 234 pt
Left: 587 pt
Bottom: 274 pt
Right: 840 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: MouseWheel scrolling through records::ScriptCalls

Layout Name:

MouseWheel scrolling through records

Top: 310 pt
Left: 587 pt
Bottom: 350 pt
Right: 840 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

Type:

Text: Enable

Layout Name:

MouseWheel scrolling through records

Top: 7 pt
Left: 51 pt
Bottom: 36 pt
Right: 179 pt

Anchoring: Left, Top

Perform Script [ “Enable” ]

Scripts:

Enable

Button Properties

Coordinates

Script/Script Step

Type:

Text: Disable

Layout Name:

MouseWheel scrolling through records

Top: 8 pt
Left: 207 pt
Bottom: 36 pt
Right: 341 pt

Anchoring: Left, Top

Perform Script [ “Disable” ]

Scripts:

Disable

Next Script: [Disable]

Script Name	Enable
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	MouseWheel scrolling through records
Scripts that use this script
Script Definition
Script Steps	If [ Get(SystemPlatform) = -2 ] #Windows Set Variable [ $r; Value:MBS( "FM.MouseWheelScriptTrigger"; /* current file with script name / Get(FileName); "MouseTrigger"; / delay / ,1; / rectangle where our fields are / 135; 60; 400; 450 ) ] Else #MacOS Set Variable [ $r; Value:MBS( "FM.MouseWheelScriptTrigger"; / current file with script name / Get(FileName); "MouseTrigger"; / delay */ ,1) ] End If Set Variable [ $r; Value:MBS( "FM.EnableMouseWheel" ) ]
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Enable]

Next Script: [MouseTrigger]

Script Name	Disable
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	MouseWheel scrolling through records
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS( "FM.MouseWheelScriptTrigger"; ""; ""; 0) ]
Fields used in this script
Scripts used in this script
Layouts used in this script
Tables used in this script
Table occurrences used by this script
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Disable]

Next Script: [Start]

Script Name	MouseTrigger
Run script with full access privileges	Off
Include In Menu	No
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	If [ Get(ActiveFieldName) = "" ] Set Variable [ $r; Value:Round(Get(ScriptParameter) / 120; 0) ] Go to Record/Request/Page [ Get ( RecordNumber ) + $r ] [ No dialog ] Set Field [ MouseWheel scrolling through records::ScriptCalls; MouseWheel scrolling through records::ScriptCalls+1 ] End If
Fields used in this script	MouseWheel scrolling through records::ScriptCalls
Scripts used in this script
Layouts used in this script
Tables used in this script	MouseWheel scrolling through records
Table occurrences used by this script	MouseWheel scrolling through records
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [MouseTrigger]

Script Name	Start
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script
Scripts that use this script
Script Definition
Script Steps	Set Field [ MouseWheel scrolling through records::ScriptCalls; "" ]
Fields used in this script	MouseWheel scrolling through records::ScriptCalls
Scripts used in this script
Layouts used in this script
Tables used in this script	MouseWheel scrolling through records
Table occurrences used by this script	MouseWheel scrolling through records
Custom Functions used by this script
Custom menu set used by this script

Download example: MouseWheel scrolling through records

Used functions: