@@ -12,6 +12,7 @@ Public Class FormTroubleshootLogs
1212 Private g_mLogContent As New ClassLogDiagnostics.ClassLogContent()
1313 Private g_mProgress As FormLoading = Nothing
1414 Private g_mLogJobs As New List( Of ClassLogDiagnostics.ILogAction)
15+ Private g_sLoadedFile As String = ""
1516
1617 Private g_mFormMain As FormMain
1718 Private g_bInitRefresh As Boolean = False
@@ -55,6 +56,25 @@ Public Class FormTroubleshootLogs
5556 TextBox_IssueInfo.Text = NOTHING_SELECTED
5657 End Sub
5758
59+ Property m_LoadedFile As String
60+ Get
61+ Return g_sLoadedFile
62+ End Get
63+ Set (value As String )
64+ g_sLoadedFile = value
65+
66+ UpdateTitle()
67+ End Set
68+ End Property
69+
70+ Private Sub UpdateTitle()
71+ If ( String .IsNullOrEmpty(m_LoadedFile)) Then
72+ Me .Text = String .Format( "Logs and Diagnostics" )
73+ Else
74+ Me .Text = String .Format( "Logs and Diagnostics ({0})" , IO.Path.GetFileName(m_LoadedFile))
75+ End If
76+ End Sub
77+
5878 Private Sub Button_LogRefresh_Click(sender As Object , e As EventArgs) Handles Button_LogRefresh.Click
5979 RereshLogs( False )
6080 End Sub
@@ -86,6 +106,8 @@ Public Class FormTroubleshootLogs
86106 End If
87107 End If
88108
109+ m_LoadedFile = ""
110+
89111 StartLogAnalysis( True , True , True , True , bSilent)
90112 End Sub
91113
@@ -144,6 +166,7 @@ Public Class FormTroubleshootLogs
144166 Next
145167 End Using
146168
169+ m_LoadedFile = mForm.FileName
147170
148171 StartLogAnalysis( False , True , True , True , False )
149172 End If
0 commit comments