Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Class Form1
- Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles Me.Resize
- If Me.WindowState = FormWindowState.Minimized Then
- Me.Hide() 'za keyloger nebitno'
- NotifyIcon1.BalloonTipText = "Prozor je minimiziran! Kikni za prosirivanje."
- NotifyIcon1.BalloonTipTitle = "Marko Mirkov program"
- NotifyIcon1.Visible = True
- NotifyIcon1.ShowBalloonTip(0)
- End If
- End Sub
- Private Sub NotifyIcon1_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
- Me.Show() 'za keyloger nebitno'
- Me.WindowState = FormWindowState.Maximized 'za keyloger nebitno'
- Me.NotifyIcon1.Visible = False 'za keyloger nebitno'
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement