[suryadewa]

biar sekalian aja setelah nulis nulis di delphi sekarang di Net.. langsung aja deh cara membuat Hide To Tray di vb 2010

[Image: Untitled.png]

yang dibutuhkan

-NotifyIcon
-1 button

- klik NotifyIcon dan isikan icon dan text pada properties

-klik button dan isikan code berikut

Code:

Private Sub Buttonhide_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Buttonhide.Click
       Me.WindowState = FormWindowState.Minimized
        Me.Visible = False
        NotifyIcon1.Visible = True
    End Sub

    Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
        Me.Visible = True
        Me.WindowState = FormWindowState.Normal
        NotifyIcon1.Visible = False
    End Sub

    Private Sub NotifyIcon1_MouseDoubleClick_1(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick

    End Sub

ganti name button dan NotifyIcon diatas sesuai dengan yang ada di project anda .

contoh source code download dibawah

Code:

http://www.tusfiles.net/ud1h5qq1cs3y

[reno]

ijin comot min buat diterapin di project ane