Cierra Ventanas un Ejemplito de control parental x novatos
Publicado: 24 Nov 2006, 02:56
para quien no quiera que abran ciertas páginas o que ejecuten algunos programas en su pc.
Solo cambia el nombre de inforchat o chat por el de las ventanas indeseadas, o sea las letras que estan arriba a la izquierda (titulo de ventana).
Solo cambia el nombre de inforchat o chat por el de las ventanas indeseadas, o sea las letras que estan arriba a la izquierda (titulo de ventana).
Código: Seleccionar todo
Opt("WinTitleMatchMode", 2)
HotKeySet("!f", "fin") ; con alt y f salimos del programa
cierraventanas("inforchat","chat")
Func cierraventanas($ventana1,$ventana2)
While 1
If WinExists($ventana1) Then WinClose($ventana1)
If WinExists($ventana2) Then WinClose($ventana2)
sleep(500)
endif
func fin()
exit
endif