File: Microsoft\VisualBasic\ApplicationServices\StartupNextInstanceEventArgs.vb
Web Access
Project: src\src\Microsoft.VisualBasic.Forms\src\Microsoft.VisualBasic.Forms.vbproj (Microsoft.VisualBasic.Forms)
' Licensed to the .NET Foundation under one or more agreements.
' The .NET Foundation licenses this file to you under the MIT license.
 
Imports System.Collections.ObjectModel
Imports System.ComponentModel
 
Namespace Microsoft.VisualBasic.ApplicationServices
 
    ''' <summary>
    '''  Provides context for the StartupNextInstance event.
    ''' </summary>
    <EditorBrowsable(EditorBrowsableState.Advanced)>
    Public Class StartupNextInstanceEventArgs
        Inherits EventArgs
 
        ''' <summary>
        '''  Creates a new instance of the StartupNextInstanceEventArgs.
        ''' </summary>
        Public Sub New(args As ReadOnlyCollection(Of String), bringToForegroundFlag As Boolean)
            If args Is Nothing Then
                args = New ReadOnlyCollection(Of String)(Nothing)
            End If
 
            CommandLine = args
            BringToForeground = bringToForegroundFlag
        End Sub
 
        ''' <summary>
        '''  Indicates whether we will bring the application to the foreground when processing the
        '''  StartupNextInstance event.
        ''' </summary>
        Public Property BringToForeground() As Boolean
 
        ''' <summary>
        '''  Returns the command line sent to this application
        ''' </summary>
        ''' <remarks>
        '''  I'm using Me.CommandLine so that it is consistent with my.net and to assure they
        '''  always return the same values
        ''' </remarks>
        Public ReadOnly Property CommandLine() As ReadOnlyCollection(Of String)
 
    End Class
End Namespace