1 respuesta en este tema

[sir.dev.a.lot]

[TRUCO DELPHI] Ocultar, Mostrar, Habilitar, Inhabilitar boton de Inicio de Windows.

delphi

procedure TForm1.Button1Click(Sender: TObject);
var
Rgn : hRgn;
begin
{Oculta}
Rgn := CreateRectRgn(0, 0, 0, 0);
SetWindowRgn(FindWindowEx(FindWindow('Shell_TrayWnd', nil),0,'Button',nil),Rgn, true);
end;
 
procedure TForm1.Button2Click(Sender: TObject);
begin
{Muestra}
SetWindowRgn(FindWindowEx(FindWindow('Shell_TrayWnd', nil),0,'Button',nil),0,true);
end;
 
procedure TForm1.Button3Click(Sender: TObject);
begin
{Inhabilita}
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil),0, 'Button', nil),false);
end;
 
procedure TForm1.Button4Click(Sender: TObject);
begin
{Habilita}
EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil),0,'Button',nil),true);
end;

Saludos!

[escafandra]

¿Has probado ese código? ¿En que versión de windows?

 

 

Saludos.