Keskustelu: Ohjelmointikysymykset: VB6: Tehtäväpalkin piilotus

Sharph [02.07.2004 13:46:10]

Miten voin VB:ssä piilottaa tehtäväpalkin?

CoDeR [02.07.2004 13:58:38]

mulla ainaki ku tein siitä formista niin ison ku saa ja laitoin sielt asetuksist sillee et siel ylhääl ei oo niit pienennä, sulje ja niitä ni se peitti ainaki mulla sen tehtäväpalkin.

rndprogy [02.07.2004 14:36:20]

Joskus minullakaan ei kyllä peittänyt tehtävä palkkia liekö syy sitten päivitysten sillä nykyään kyllä peittää.

Sharph [02.07.2004 21:24:09]

Joo kyllä mullakin peittää.

Pekka Kauppila [03.07.2004 17:07:18]

Jos tässä nyt tarkoitetaan Windowsin tehtäväpalkkia, niin sen voi piilotta seuraavalla tavalla:

Const SWP_HIDEWINDOW = &H80
Const SWP_SHOWWINDOW = &H40

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Dim tehtpWnd As Long

Private Sub Form_Load()
  'Tehtäväpalkin kahva...
  tehtpWnd = FindWindow("Shell_traywnd", vbNullString)
  'Tehtäväpalkki piiloon
  SetWindowPos tehtpWnd, 0, 0, 0, 0, 0, SWP_HIDEWINDOW
End Sub

Private Sub Form_Unload(Cancel As Integer)
  'Tehtäväpalkki näkyviin
  SetWindowPos tehtpWnd, 0, 0, 0, 0, 0, SWP_SHOWWINDOW
End Sub

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Kirjautuminen

Haku