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 )
function Leadtools.Multimedia.PlayCtrl.CanSaveObjectSettings( flags )
public: virtual bool CanSaveObjectSettings( PlaySettings flags )
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 175\Media"; End Class
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 175\Media"; }
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2