Private Sub frmMain_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs)
If Not Me.WindowState = Windows.Forms.FormWindowState.Minimized Then
Exit Sub
End If
Me.Visible = False
Dim frmTray As New trayForm
frmTray.fMain = Me
frmTray.Show()
End Sub
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 74