Monkeybread Software - MBS FileMaker Plugin: AVRecorder

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

MBS FileMaker Plugin Example Databases

AVRecorder

All examples are included with download of MBS FileMaker Plugin.

AVRecorder.fmp12

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

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

Tables

Table Name	Statistics	Occurrences in Relationship Graph
AVRecorder	3 fields defined, 1 record	AVRecorder

Fields

Table Name: AVRecorder - 3 Fields
Field Name	Type	Options	Comments	On Layouts	In Relationships	In Scripts	In Value Lists
Session	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		AVRecorder		InitScript Set Audio Device Set Video Device Start Recording Stop Recording Shutdown Start Preview Take Picture
FilePath	Normal, Text	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1 Indexing: None Automatically create indexes as needed Index Language: German		AVRecorder		InitScript Start Recording
Image	Normal, Binary	Auto-Enter: Allow editing Validation: Only during data entry Storage: Repetitions: 1		AVRecorder		Take Picture

Layout Objects: AVRecorder

Regular Fields

Field Name: AVRecorder::Session

Layout Name:

AVRecorder

Top: 54 pt
Left: 138 pt
Bottom: 75 pt
Right: 391 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

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

Yes

Field Name: AVRecorder::FilePath

Layout Name:

AVRecorder

Top: 78 pt
Left: 138 pt
Bottom: 99 pt
Right: 391 pt

Anchoring: Left, Top

Field Format:

Edit Box

Field Behavior:

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

Yes

Field Name: AVRecorder::Image

Layout Name:

AVRecorder

Top: 59 pt
Left: 624 pt
Bottom: 302 pt
Right: 941 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: Set Video Device

Layout Name:

AVRecorder

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 78 pt
Left: 408 pt
Bottom: 109 pt
Right: 553 pt

Anchoring: Left, Top

Perform Script [ “Set Video Device” ]

Scripts:

Set Video Device

Button Properties

Coordinates

Script/Script Step

Type:

Text: Set Audio Device

Layout Name:

AVRecorder

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 116 pt
Left: 408 pt
Bottom: 148 pt
Right: 553 pt

Anchoring: Left, Top

Perform Script [ “Set Audio Device” ]

Scripts:

Set Audio Device

Button Properties

Coordinates

Script/Script Step

Type:

Text: Start Recording

Layout Name:

AVRecorder

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 153 pt
Left: 408 pt
Bottom: 184 pt
Right: 553 pt

Anchoring: Left, Top

Perform Script [ “Start Recording” ]

Scripts:

Start Recording

Button Properties

Coordinates

Script/Script Step

Type:

Text: Stop Recording

Layout Name:

AVRecorder

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 190 pt
Left: 408 pt
Bottom: 221 pt
Right: 553 pt

Anchoring: Left, Top

Perform Script [ “Stop Recording” ]

Scripts:

Stop Recording

Button Properties

Coordinates

Script/Script Step

Type:

Text: Start Preview

Layout Name:

AVRecorder

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 227 pt
Left: 408 pt
Bottom: 258 pt
Right: 553 pt

Anchoring: Left, Top

Perform Script [ “Start Preview” ]

Scripts:

Start Preview

Button Properties

Coordinates

Script/Script Step

Type:

Text: Take Picture

Layout Name:

AVRecorder

Additional Properties:

Change to hand cursor over button
Rectangular

Top: 264 pt
Left: 408 pt
Bottom: 295 pt
Right: 553 pt

Anchoring: Left, Top

Perform Script [ “Take Picture” ]

Scripts:

Take Picture

Next Script: [Set Audio Device]

Script Name	InitScript
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 [ AVRecorder::Session; MBS("AVRecorder.Init") ] If [ MBS("SystemInfo.isMacOSX") ] Set Field [ AVRecorder::FilePath; MBS( "Folders.UserDesktop" ) & "/test.m4v" ] Else Set Field [ AVRecorder::FilePath; MBS( "Folders.UserDesktop" ) & "\test.avi" ] End If If [ MBS("IsMacOS") ] If [ MBS( "AVRecorder.AuthorizationStatusForMediaType"; "video" ) = "NotDetermined" ] Set Variable [ $r; Value:MBS( "AVRecorder.RequestAccessForMediaType"; "video" ) ] End If If [ MBS( "AVRecorder.AuthorizationStatusForMediaType"; "audio" ) = "NotDetermined" ] Set Variable [ $r; Value:MBS( "AVRecorder.RequestAccessForMediaType"; "audio" ) ] End If End If
Fields used in this script	AVRecorder::Session AVRecorder::FilePath
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [InitScript]

Next Script: [Set Video Device]

Script Name	Set Audio Device
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	AVRecorder
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("AVRecorder.SetAudioDevice"; AVRecorder::Session; 0) ] Show Custom Dialog [ Title: "Audio Device"; Message: MBS("AVRecorder.GetAudioDevice"; AVRecorder::Session); Default Button: “OK”, Commit: “Yes”; Button 2: “Cancel”, Commit: “No” ]
Fields used in this script	AVRecorder::Session
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Set Audio Device]

Next Script: [Start Recording]

Script Name	Set Video Device
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	AVRecorder
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("AVRecorder.SetVideoDevice"; AVRecorder::Session; 0) ] Show Custom Dialog [ Title: "Video Device"; Message: MBS("AVRecorder.GetVideoDevice"; AVRecorder::Session); Default Button: “OK”, Commit: “Yes”; Button 2: “Cancel”, Commit: “No” ]
Fields used in this script	AVRecorder::Session
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Set Video Device]

Next Script: [Stop Recording]

Script Name	Start Recording
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	AVRecorder
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("AVRecorder.SetFilePath"; AVRecorder::Session; AVRecorder::FilePath) ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Error"; Message: $r; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If Set Variable [ $r; Value:MBS("AVRecorder.StartRecording"; AVRecorder::Session) ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Error"; Message: $r; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If
Fields used in this script	AVRecorder::Session AVRecorder::FilePath
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Start Recording]

Next Script: [Shutdown]

Script Name	Stop Recording
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	AVRecorder
Scripts that use this script
Script Definition
Script Steps	Set Variable [ $r; Value:MBS("AVRecorder.StopRecording"; AVRecorder::Session) ]
Fields used in this script	AVRecorder::Session
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Stop Recording]

Next Script: [Start Preview]

Script Name	Shutdown
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	If [ AVRecorder::Session ≠ "" ] Set Variable [ $r; Value:MBS("AVRecorder.Release"; AVRecorder::Session) ] Set Field [ AVRecorder::Session; "" ] End If
Fields used in this script	AVRecorder::Session
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Shutdown]

Next Script: [Take Picture]

Script Name	Start Preview
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	AVRecorder
Scripts that use this script
Script Definition
Script Steps	#make sure FileMaker has enough time to redraw the layout Pause/Resume Script [ Duration (seconds): ,3 ] #add preview based on placeholder control // Set Variable [ $r; Value:MBS("AVRecorder.AddPreviewToWindow"; AVRecorder::Session; Get(WindowName); 50; 150; 320; 240) ] Set Variable [ $r; Value:MBS("AVRecorder.AddPreviewWithControl"; AVRecorder::Session; Get(WindowName); "Preview") ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Failed to add preview control"; Message: $r; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If #start live preview Set Variable [ $r; Value:MBS("AVRecorder.StartPreview"; AVRecorder::Session) ] If [ MBS("IsError") ] Show Custom Dialog [ Title: "Failed to start preview"; Message: $r; Default Button: “OK”, Commit: “Yes” ] Exit Script [ ] End If
Fields used in this script	AVRecorder::Session
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Previous Script: [Start Preview]

Script Name	Take Picture
Run script with full access privileges	Off
Include In Menu	Yes
Layouts that use this script	AVRecorder
Scripts that use this script
Script Definition
Script Steps	Set Field [ AVRecorder::Image; MBS( "AVRecorder.CaptureStillPhoto"; AVRecorder::Session ) ]
Fields used in this script	AVRecorder::Session AVRecorder::Image
Scripts used in this script
Layouts used in this script
Tables used in this script	AVRecorder
Table occurrences used by this script	AVRecorder
Custom Functions used by this script
Custom menu set used by this script

Download example: AVRecorder

Used functions: