Products | Support | Email a link to this topic. | Send comments on this topic. | Back to Introduction | Help Version 19.0.2.9
|
Leadtools.Multimedia Namespace > PlayCtrl Class : CanSaveObjectSettings Method |
public virtual bool CanSaveObjectSettings( PlaySettings flags )
'Declaration
Public Overridable Function CanSaveObjectSettings( _ ByVal flags As PlaySettings _ ) As Boolean
'Usage
Dim instance As PlayCtrl Dim flags As PlaySettings Dim value As Boolean value = instance.CanSaveObjectSettings(flags)
public: virtual bool CanSaveObjectSettings( PlaySettings flags )
Imports Leadtools Imports Leadtools.Multimedia Imports LeadtoolsMultimediaExamples.Fixtures Public _result As Boolean = False Public _form As PlayCtrlForm = New PlayCtrlForm() Public _playctrl As PlayCtrl Public _streamSettings As String = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_ObjectSettingsExample_Stream.xml") Public _fileSettings As String = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_ObjectSettingsExample.xml") Public Sub ObjectSettingsExample() ' reference the play control _playctrl = _form.PlayCtrl ' input files Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_Source.avi") Try Dim pVideoDizzy As Processor = _playctrl.VideoProcessors.EFXDizzy ' set a video processor _playctrl.SelectedVideoProcessors.Add(pVideoDizzy) ' save the settings to a file If SaveFileSettings() Then ' now clear the selected processors again _playctrl.SelectedVideoProcessors.Clear() ' check if stream file exists If File.Exists(_fileSettings) Then ' load the saved settings from a file ' and check if the processor is selected again LoadFileSettings() ' set the result _result = _playctrl.SelectedVideoProcessors.Contains(pVideoDizzy) End If End If ' save the settings to a stream If SaveStreamSettings() Then ' now clear the selected processors again _playctrl.SelectedVideoProcessors.Clear() ' check if stream file exists If File.Exists(_streamSettings) Then ' load the saved settings from a stream ' and check if the processor is selected again LoadStreamSettings() ' set the result _result = _result And _playctrl.SelectedVideoProcessors.Contains(pVideoDizzy) End If End If Catch e1 As Exception _result = False End Try End Sub Private Sub LoadFileSettings() _playctrl.LoadSettingsFromFile(_fileSettings, PlaySettings.Processors) End Sub Private Function SaveFileSettings() As Boolean ' check if we can save the processors settings If _playctrl.CanSaveObjectSettings(PlaySettings.Processors) Then _playctrl.SaveSettingsToFile(_fileSettings, PlaySettings.Processors) Return True End If Return False End Function Private Sub LoadStreamSettings() Dim settings As Stream = New StreamReader(_streamSettings).BaseStream _playctrl.LoadSettingsFromStream(settings, PlaySettings.Processors) settings.Close() End Sub Private Function SaveStreamSettings() As Boolean ' check if we can save the processors settings If _playctrl.CanSaveObjectSettings(PlaySettings.Processors) Then Dim settings As Stream = New StreamWriter(_streamSettings, False).BaseStream _playctrl.SaveSettingsToStream(settings, PlaySettings.Processors) settings.Close() Return True End If Return False End Function Public NotInheritable Class LEAD_VARS Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media" End Class
using Leadtools; using Leadtools.Multimedia; using LeadtoolsMultimediaExamples.Fixtures; public bool _result = false; public PlayCtrlForm _form = new PlayCtrlForm(); public PlayCtrl _playctrl; public string _streamSettings =Path.Combine(LEAD_VARS.MediaDir,"PlayCtrl_ObjectSettingsExample_Stream.xml"); public string _fileSettings =Path.Combine(LEAD_VARS.MediaDir,"PlayCtrl_ObjectSettingsExample.xml"); public void ObjectSettingsExample() { // reference the play control _playctrl = _form.PlayCtrl; // input files string inFile =Path.Combine(LEAD_VARS.MediaDir,"PlayCtrl_Source.avi"); try { Processor pVideoDizzy = _playctrl.VideoProcessors.EFXDizzy; // set a video processor _playctrl.SelectedVideoProcessors.Add(pVideoDizzy); // save the settings to a file if (SaveFileSettings()) { // now clear the selected processors again _playctrl.SelectedVideoProcessors.Clear(); // check whether a stream file exists if (File.Exists(_fileSettings)) { // load the saved settings from a file // and check whether the processor is selected again LoadFileSettings(); // set the result _result = _playctrl.SelectedVideoProcessors.Contains(pVideoDizzy); } } // save the settings to a stream if (SaveStreamSettings()) { // now clear the selected processors again _playctrl.SelectedVideoProcessors.Clear(); // check whether a stream file exists if (File.Exists(_streamSettings)) { // load the saved settings from a stream // and check whether the processor is selected again LoadStreamSettings(); // set the result _result &= _playctrl.SelectedVideoProcessors.Contains(pVideoDizzy); } } } catch (Exception) { _result = false; } } private void LoadFileSettings() { _playctrl.LoadSettingsFromFile(_fileSettings, PlaySettings.Processors); } private bool SaveFileSettings() { // check whether we can save the processors settings if (_playctrl.CanSaveObjectSettings(PlaySettings.Processors)) { _playctrl.SaveSettingsToFile(_fileSettings, PlaySettings.Processors); return true; } return false; } private void LoadStreamSettings() { Stream settings = new StreamReader(_streamSettings).BaseStream; _playctrl.LoadSettingsFromStream(settings, PlaySettings.Processors); settings.Close(); } private bool SaveStreamSettings() { // check whether we can save the processors settings if (_playctrl.CanSaveObjectSettings(PlaySettings.Processors)) { Stream settings = new StreamWriter(_streamSettings, false).BaseStream; _playctrl.SaveSettingsToStream(settings, PlaySettings.Processors); settings.Close(); return true; } return false; } static class LEAD_VARS { public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media"; }