![](dotnetdiagramimages/OpcLabs_EasyOpcForms_OpcLabs_EasyOpc_Forms_Browsing_ComTypes__OpcBrowseDialog.png)
'Declaration
<CLSCompliantAttribute(False)> <ComVisibleAttribute(True)> <GuidAttribute("0AA07238-D0EB-44A6-B1A4-C18F6BF4DE44")> <InterfaceTypeAttribute(ComInterfaceType.InterfaceIsDual)> Public Interface _OpcBrowseDialog
'Usage
Dim instance As _OpcBrowseDialog
[CLSCompliant(false)] [ComVisible(true)] [Guid("0AA07238-D0EB-44A6-B1A4-C18F6BF4DE44")] [InterfaceType(ComInterfaceType.InterfaceIsDual)] public interface _OpcBrowseDialog
[CLSCompliant(false)] [ComVisible(true)] [Guid("0AA07238-D0EB-44A6-B1A4-C18F6BF4DE44")] [InterfaceType(ComInterfaceType.InterfaceIsDual)] public interface class _OpcBrowseDialog
// This example shows how to let the user browse for an OPC Data Access node in a dialog. using System.Windows.Forms; using OpcLabs.EasyOpc.Forms.Browsing; namespace FormsDocExamples._OpcBrowseDialog { static class ShowDialog { public static void Main1(IWin32Window owner) { var browseDialog = new OpcBrowseDialog(); DialogResult dialogResult = browseDialog.ShowDialog(owner); if (dialogResult != DialogResult.OK) return; // Display results MessageBox.Show(owner, browseDialog.Outputs.CurrentNodeElement.DANodeElement); } } }
# This example shows how to let the user browse for an OPC Data Access node in a dialog. # The path below assumes that the current directory is [ProductDir]/Examples-NET/PowerShell/Windows . Add-Type -Path "../../../Components/Opclabs.QuickOpc/net472/OpcLabs.EasyOpcForms.dll" $browseDialog = New-Object OpcLabs.EasyOpc.Forms.Browsing.OpcBrowseDialog $dialogResult = $browseDialog.ShowDialog() if ($dialogResult -ne [System.Windows.Forms.DialogResult]::OK) { return } # Display results Write-Host $browseDialog.Outputs.CurrentNodeElement.DANodeElement
# This example shows how to let the user browse for an OPC Data Access node in a dialog. # The QuickOPC package is needed. Install it using "pip install opclabs_quickopc". import opclabs_quickopc # Import .NET namespaces. from System.Windows.Forms import * from OpcLabs.EasyOpc.Forms.Browsing import * browseDialog = OpcBrowseDialog() dialogResult = browseDialog.ShowDialog() print(dialogResult) if dialogResult != DialogResult.OK: exit() # Display results. print('DANodeElement: ', browseDialog.Outputs.CurrentNodeElement.DANodeElement, sep='')
// This example shows how to let the user browse for an OPC Data Access node. class procedure ShowDialog.Main; var BrowseDialog: OpcLabs_EasyOpcForms_TLB._OpcBrowseDialog; begin // Instantiate the dialog object BrowseDialog := CoOpcBrowseDialog.Create; BrowseDialog.ShowDialog(nil); // Display results WriteLn(BrowseDialog.Outputs.CurrentNodeElement.DANodeElement.ToString); end;
Rem This example shows how to let the user browse for an OPC Data Access node. Private Sub ShowDialog_Main_Command_Click() OutputText = "" ' Instantiate the dialog object Dim browseDialog As New OpcBrowseDialog Dim dialogResult dialogResult = browseDialog.ShowDialog OutputText = OutputText & dialogResult & vbCrLf If dialogResult <> 1 Then ' OK Exit Sub End If ' Display results OutputText = OutputText & browseDialog.Outputs.CurrentNodeElement.DANodeElement & vbCrLf End Sub
Rem This example shows how to let the user browse for an OPC Data Access node. Option Explicit Const DialogResult_OK = 1 Dim BrowseDialog: Set BrowseDialog = CreateObject("OpcLabs.EasyOpc.Forms.Browsing.OpcBrowseDialog") Dim dialogResult: dialogResult = BrowseDialog.ShowDialog WScript.Echo dialogResult If dialogResult <> DialogResult_OK Then WScript.Quit End If ' Display results WScript.Echo BrowseDialog.Outputs.CurrentNodeElement.DANodeElement