COM object EvSingleTargetDetectionDualBeamParameters
EvApplication > EvFileCollection > EvFile > EvVariablesCollection > EvVariableBase As EvVariableVirtual > EvVariableAcousticProperties > EvSingleTargetDetectionDualBeamParameters
View the COM map and the COM summary. |
The EvSingleTargetDetectionDualBeamParameters object provides access to specific dual-beam settings on the Single Target Detection page of the Variable Properties dialog box for the acoustic variable via the EvVariableAcousticProperties.SingleTargetDetectionDualBeamParameters property.
EvSingleTargetDetectionDualBeamParameters properties:
Properties |
Description |
double MaximumBeamCompensation SummaryGet or set the Maximum Beam Compensation setting under the Single target detection parameters section of the Single Target Detection page of the Variable Properties dialog box. ExampleDim sFile: sFile = "C:\Temp\tmp.EV" Dim sVar: sVar = "dual beam m1" Const eOperatorSingleTargetDetectionDualBeamMethod1 = 66 Const eOperatorSingleTargetDetectionDualBeamMethod2 = 124 Dim oEchoviewCom: Set oEchoviewCom = CreateObject("EchoviewCom.EvApplication") Dim oEvFile: Set oEvFile = oEchoviewCom.OpenFile(sFile) Dim oVar: Set oVar = oEvFile.Variables.FindByName(sVar) If oVar.AsVariableVirtual Is Nothing Then MsgBox "'" & sVar & "' is not a virtual variable" End IfeType: eType = oVar.Operator If Not (eType = eOperatorSingleTargetDetectionDualBeamMethod1 Or _ eType = eOperatorSingleTargetDetectionDualBeamMethod2) Then MsgBox "'" & sVar & "' is not a Dual beam Single Target Detection" WScript.Quit End If Dim oSingle: Set oSingle = oVar.Properties.SingleTargetDetectionParameters MsgBox "'" & sVar & "' Single Beam parameters:"_ & " TsThreshold: " & CStr(oSingle.TsThreshold)_ & " PLDL: " & CStr(oSingle.PLDL)_ & " MinimumPulseLength: " & CStr(oSingle.MinimumPulseLength)_ & " MaximumPulseLength: " & CStr(oSingle.MaximumPulseLength)_ & " ExcludeAboveLine: " & oSingle.ExcludeAboveLine _ & " ExcludeBelowLine: " & oSingle.ExcludeBelowLine oSingle.ExcludeAboveLine = "Line 1" MsgBox "'" & sVar & "' ExcludeAboveLine: " & oSingle.ExcludeAboveLine If eType = eOperatorSingleTargetDetectionDualBeamMethod1 Or _ eType = eOperatorSingleTargetDetectionDualBeamMethod2 Then Dim oDual: Set oDual = oVar.Properties.SingleTargetDetectionDualBeamParameters MsgBox "'" & sVar & "' Dual Beam parameters:"_ & " MaximumBeamCompensation:" & CStr(oDual.MaximumBeamCompensation)_ & " OverAxisAngleThreshold:" & CStr(oDual.OverAxisAngleThreshold) End If |
|
double OverAxisAngleThreshold Summary Get or set the Over axis angle threshold (dB) setting under the Single target detection parameters section of the Single Target Detection page of the Variable Properties dialog box. ExampleRefer to single target and dual beam specific settings example. |
Notes:
- Common single target detection properties can be accessed by EvSingleTargetDetectionParameters.
- Filter Single target page settings are accessed via EvFilterTargets.
See also
Scripting with COM objects
COM object hierarchy