RE:Altura de la barra de tareas
Publicado por
Andre (1 intervención) el 30/12/2001 06:34:33
Concretamente no se responderte, pero si conozco la manera de ocultarla, esto te puede servir como pie para continuar investigando.
Este seria el codigo:
private declare function FindWindow lib "user32" alias "FindWindowA" (ByVal lpClassName as String, ByVal lqWindowsName as String) as Long
private function ShowWindow lib "user32" (ByVal hwnd as Long, ByVal nCmdShow as Long) as Long
Private sub command1_click()
dim startWindow as long
startWindow = FindWindow("Shell_TrayWnd, vbNullString)
if MsgBox("¿Ocultar?", vbYesNo) = vbYes then
showWindow startWindow, 0&
else
showWindow startWindow, 1&
end if
end sub
Espero q esto te pueda servir para continuar investigando, siento no poder aclarar tu duda, ademas, estas seguro de querer hacerlo?, no has pensado q el usuario no tiene pq tener la barra abajo y q si la tiene en un lateral ya no tienes q hayar el alto sino el ancho?. Suerte