Lilis Lilis> dear chipmunks, Lilis> kira2 ini bukan maksudnya, koding ini utk hide form Lilis> from taskbar.
Lilis> '--------------------------------------------------------------------------------- Lilis> Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _ Lilis> (ByVal hwnd As Long, ByVal nIndex As Long) As Long Lilis> Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _ Lilis> (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long Lilis> Public Const GWL_EXSTYLE = (-20) Lilis> Public Const WS_EX_APPWINDOW = &H40000 Lilis> '---------------------------------------------------------------------------------- Lilis> Private Sub chkTaskbar_Click() Lilis> Dim style As Long Lilis> Hide Lilis> style = GetWindowLong(hwnd, GWL_EXSTYLE) Lilis> If chkTaskbar.Value = 0 Then Lilis> If style And WS_EX_APPWINDOW Then Lilis> style = style - WS_EX_APPWINDOW Lilis> End If Lilis> Else Lilis> style = style Or WS_EX_APPWINDOW Lilis> End If Lilis> SetWindowLong hwnd, GWL_EXSTYLE, style Lilis> App.TaskVisible = CBool(chkTaskbar.Value) Lilis> Show Lilis> End Sub Lilis> salam Lilis> lis hehehehehe bener lis tapi aku baru ketemu langkah yang lebih singkat... di properties ada showintaskbar = false Salam, ChipMunks (Copy Paste Programmer) mailto: [EMAIL PROTECTED] Yahoo : Henqy Skype : Hengky_Purnomo
