![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#3
|
||||
|
||||
|
Hola:
Extraido de trucomania : Oculta el boton inicio y lo hace aparecer, PROBADO EN WINXP y supongo que en windows 98 tambien funcionará.Si quieres ocultar los iconos del escritorio, lo puedes hacer en windows sin tocar nada por programacion, procedure TForm1.Button1Click(Sender: TObject); begin {Hacer desaparecer el boton} {Hide the Button} ShowWindow ( FindWindowEx(FindWindow( 'Shell_TrayWnd', nil), 0, 'Button', nil) ,SW_Hide); end; procedure TForm1.Button2Click(Sender: TObject); begin {Mostrar el boton} {Show the button} ShowWindow ( FindWindowEx(FindWindow( 'Shell_TrayWnd', nil), 0, 'Button', nil) ,SW_ShowNormal); end; |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|