Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Quitar el boton de inicio

Estas en el tema de Quitar el boton de inicio en el foro de Visual Basic clásico en Foros del Web. Hola, quisiera saber como puedo quitar el boton de inicio de la barra de tareas de windows, pero sin quitar la barra de tareas o ...
  #1 (permalink)  
Antiguo 28/02/2005, 17:29
Avatar de robertonavarro  
Fecha de Ingreso: octubre-2004
Mensajes: 72
Antigüedad: 19 años, 6 meses
Puntos: 1
Busqueda Quitar el boton de inicio

Hola, quisiera saber como puedo quitar el boton de inicio de la barra de tareas de windows, pero sin quitar la barra de tareas o deshabililitarlo para que no se tenga acceso a el ni por el teclado ni por el mouse. Quisiera saber si es posible programarlo desde un programa en VB 6. El sistema operativo es windows XP.

Gracias por su ayuda.
  #2 (permalink)  
Antiguo 28/02/2005, 21:53
Avatar de julwo  
Fecha de Ingreso: mayo-2004
Ubicación: santiago, Rep Dom
Mensajes: 252
Antigüedad: 20 años
Puntos: 0
echale un ojo
http://www.forosdelweb.com/f42/como-bloquear-boton-inicio-275219/
__________________
Cuando las cosa son Buenas, SON BUENAS! no importan las R@tas que orinen en el camino! Me SiGUe!!
  #3 (permalink)  
Antiguo 28/02/2005, 21:54
Avatar de julwo  
Fecha de Ingreso: mayo-2004
Ubicación: santiago, Rep Dom
Mensajes: 252
Antigüedad: 20 años
Puntos: 0
a pero fue a ti que te respondi ahorita na no me di cuenta
__________________
Cuando las cosa son Buenas, SON BUENAS! no importan las R@tas que orinen en el camino! Me SiGUe!!
  #4 (permalink)  
Antiguo 01/03/2005, 13:09
Avatar de vbx3m  
Fecha de Ingreso: febrero-2005
Ubicación: Venezuela
Mensajes: 524
Antigüedad: 19 años, 3 meses
Puntos: 1
Quitar boton Inicio

Usa este codigo en el form:

Option Explicit

Private a As Long
Private b As Long
Private Button As Long
Private Declare Function ShowWindow Lib "USER32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function FindWindow& Lib "USER32" Alias "FindWindowA" (ByVal ipclassname As String, ByVal ipwindowsname As String)
Private Declare Function GetWindow Lib "USER32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Private Const SW_HIDE = 0
Private Const SW_SHOW = 5
Private Const GW_CHILD = 5
Private Const g_cstrShellTaskBarWnd As String = "Shell_TrayWnd"

Public Function PonBotonINICIO()
a = FindWindow("Shell_traywnd", "")
Button = GetWindow(a, GW_CHILD)
Call ShowWindow(b, SW_SHOW)
End Function

Public Function QuitaBotonINICIO()
a = FindWindow("Shell_traywnd", "")
b = GetWindow(a, GW_CHILD)
Call ShowWindow(b, SW_HIDE)
End Function

Pruebalo y me avisas que tal...
__________________
ホルヘ・ラファエル・マルティネス・レオン
  #5 (permalink)  
Antiguo 01/03/2005, 16:03
Avatar de robertonavarro  
Fecha de Ingreso: octubre-2004
Mensajes: 72
Antigüedad: 19 años, 6 meses
Puntos: 1
Funciona perfectamente bien. Excelente vbx3m! siempre traes un As bajo la manga!
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 01:30.