Dobrý den, mám aplikaci, u které se při spuštění s parametrem /startup nezobrazí okno, ale jen NotifyIcon. Tady je ukázka: tohle je ve startovním modulu
Private WithEvents frm As Form1
Public Sub Main()
Application.EnableVisualStyles()
frm = New Form1
If Not Environment.CommandLine.ToLower.Contains("/startup") Then
frm.Show()
End If
Application.Run()
End Sub
Private Sub frm_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles frm.FormClosed
Application.Exit()
End Sub
a tohle ve formuláři
Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
Select Case Me.Visible
Case True : Me.Hide()
Case False : Me.Show()
End Select
End Sub
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim x As Integer = MessageBox.Show("Ukoncit?", "", MessageBoxButtons.YesNo)
If x = vbNo Then e.Cancel = True
End Sub
Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem1.Click
'ToolStripMenuItem1 je polozka contextového menu přiřazeného k NotifyIcon
Me.Close()
End Sub
Problém je tenhle: když aplikace nastartuje bez toho parametru a pokusím se ukončit program tlačítkem ToolStripMenuItem1, vše je ok. Kdyz ho ale spustím s parametrem, tak nastává ten problém, že se nedojde k události FormClosing a ukončí se jen formulář, ne celá aplikace. Nevíte někdo jak to řešit, aby to pracovalo stejně po spuštění i po tom co bylo zobrazeno okno? Za věchny nápady předem děkuju
|