Esta función es de las más solicitadas. A través de ella podemos interactuar con las ventanas. en este caso ocultara la barra de tareas de windows
Declare Integer SetWindowPos In "user32" ;
Integer hwnd , ;
Integer hWndInsertAfter , ;
Integer x ,;
Integer y , ;
Integer cx ,;
Integer cy ,;
Integer wFlags
Declare Integer FindWindow In "user32" As "FindWindowA" ;
String lpClassName, ;
String lpWindowName
Ventana = FindWindowA("Shell_traywnd","")
=SetWindowPos (Ventana, 0, 0, 0, 0, 0, 128 ) && oculta
Wait windows "barra ocultada" time 3
=SetWindowPos (Ventana, 0, 0, 0, 0, 0, 64) && muestra
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com