Deshabilitar panelde control
 

Reciban un cordial saludo

Quiero saber como podria deshabilitar el panel de control y Ejecutar cuando se inicie mi programa en bds 2006

Gracias por sus respuestas

Julipo

Simple, desactivándolo desde el registro de Windows.

Código Delphi [-]
uses
  Registry;

procedure DeshabilitarPanelDeControl(HRoot: HKEY);
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HRoot;
    if Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Policies', True) then
    try
      Reg.WriteInteger('NoControlPanel', 1);
    except
      on exception do
        Abort;
    end;
  finally
    Reg.Free;
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  DeshabilitarPanelDeControl(HKEY_CURRENT_USER);
  DeshabilitarPanelDeControl(HKEY_LOCAL_MACHINE);
  // Necesitarás hacer una rutina extra de reinicio del PC para que el cambio surta efecto.

end;

Espero que uses el código para una buena acción, NO para malware.

Saludos.