Ver Mensaje Individual
  #3  
Antiguo 05-07-2003
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
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;
Responder Con Cita