EQPro 1.5 Documentation |
|||||
Introduction | Properties | Methods | Events | Constants | Code Samples |
FindLines(ReturnType As ReturnTypeConstants, [LineName As String], [Hold As Boolean]) As Variant
Taking a partial string as the line name to look for, returns information about every matching line.
The first call to the function should include a complete or partial LineName.
Successive calls will return every possible match.
Once you have found the line you were looking for, you can get all the information about that line by changing the ReturnType value and making the Hold value True. When the Hold parameter is True, FindLines will return the information requested about the last found line.
The function will return a blank string when no more matches are found.For example, to look for the ID of the Bass control, you should try this code:
Dim LineName As String Dim BassID As Long LineName = EQProCtrl.FindLines(rtName, "Bass") If LineName <> "" Then BassID = EQProCtrl.FindLines(rtID, LineName) End IfAnother common situation would be to look for the Master Volume control. This code should do the work:
Dim LineName As String Dim MasterVolID As LongLineName = EQProCtrl.FindLines(rtName, "Volume") Do Until LineName = "" Or InStr(LineName, "Master") > 0 LineName = EQProCtrl.FindLines(rtName) Loop If LineName <> "" Then MasterVolID = EQProCtrl.FindLines(rtID, LineName) End IfPlease note that this code is just a sample of how to use the FindLine function... in case your application needs to find the Master Volume control, this line is always the first line in the OutputLineID array.
Another common situation would be to look for the input line ID of the Microphone line. Here's how, using the FindLine function:
Dim LineName As String Dim MicID As Long Dim LineDir As DirectionConstants LineName = EQProCtrl.FindLines(rtName, "Mic") LineDir = EQProCtrl.FindLines(rtDirection, LineName) Do Until LineName = "" Or LineDir = dInput LineDir = EQProCtrl.FindLines(rtDirection) Loop If LineName = "" Then 'We should raise an error, since this means that 'the installed mixer device does not have an 'input microphone line Else MicID = EQProCtrl.FindLines(rtID, , True) End IfPlease note that for these samples to work you must properly initialize the EQPro control, using the InitEQ method and select the mixer device to which the EQPro should be bound to.
This method initializes the control and prepares it to start working.
You should call this method before using any other property or method.
SetAdvancedLinesValues(idx As Integer, NewValue As Long)
Sets a new value to the advanced line addressed by the idx value.
before calling this method, you should check the valid range of values this line can accept.