Unlock Tool: CMD und Taskmanager sperren/entsperren

[DelphiSecurity]

Hallo mal wieder!

Ich bin momentan dabei ein Unlock Tool v2.0 zu programmieren.
Unlock Tool v1.0 habe ich mal (als mir langweilig war ) programmiert.

Dort konnte man die CMD sperren/entsperren. Unter XP lief es genial (auch auf Windows Server).
Aber jetzt auf -> Windows 7 Professional 32bit <- funtioniert der Code nicht mehr.

Delphi-Quellcode:

procedure TFormM.CMDLockSClick(Sender: TObject); // CMD is locked Bat-funktion is unlocked
begin
  CMD:= TRegistry.Create;
  try
    CMD.RootKey:= HKEY_CURRENT_USER;
    CMD.OpenKey('Software\Policies\Micrsoft\Windows\System', true);
    CMD.WriteInteger('DisableCMD', 1);
    Log.Lines.Add('CMD Lock (.bat ok) => Success!')
  except
    Log.Lines.Add('CMD Lock (.bat ok) => No Success!');
  end;
  CMD.Free;
end;

procedure TFormM.CMDLockSSClick(Sender: TObject); // CMD is locked Bat-funktion is locked
begin
  CMD:= TRegistry.Create;
  try
    CMD.RootKey:= HKEY_CURRENT_USER;
    CMD.OpenKey('Software\Policies\Micrsoft\Windows\System', true);
    CMD.WriteInteger('DisableCMD', 2);
    Log.Lines.Add('CMD Lock (.bat no) => Success!')
  except
    Log.Lines.Add('CMD Lock (.bat no) => No Success!');
  end;
  CMD.Free;
end;

procedure TFormM.CMDUnlockSClick(Sender: TObject); // CMD is unlocked
begin
  CMD:= TRegistry.Create;
  try
    CMD.RootKey:= HKEY_CURRENT_USER;
    CMD.OpenKey('Software\Policies\Micrsoft\Windows\System', true);
    CMD.WriteInteger('DisableCMD', 0);
    Log.Lines.Add('CMD Unlock => Success!')
  except
    Log.Lines.Add('CMD Unlock => No Success!');
  end;
  CMD.Free;
end;

Nur bei Admin funktioniert es, aber das ist nicht der Sinn.
Ich brauche nur die richtigen Reg-Schlüssel.
Für den Taskmanager wäre auch schön.

"Unlock Tool v1.0" ist im Anhang! Passwort: helper

Schon mal DANKE!

[SirThornberry]

Zitat von DelphiSecurity:

Nur bei Admin funktioniert es, aber das ist nicht der Sinn.
Ich brauche nur die richtigen Reg-Schlüssel.

Wenn es beim Admin funktioniert hast du vielleicht die richtigen Schlüssel?!
Dir fehlen scheinbar die Rechte für diesen Eingriff.

[DelphiSecurity]

Zitat von SirThornberry:

Zitat von DelphiSecurity:

Nur bei Admin funktioniert es, aber das ist nicht der Sinn.
Ich brauche nur die richtigen Reg-Schlüssel.

Wenn es beim Admin funktioniert hast du vielleicht die richtigen Schlüssel?!
Dir fehlen scheinbar die Rechte für diesen Eingriff.

Naja soll ja Sachen freischalten wenn man kein Admin ist!

HKEY_CURRENT_USER besitzt jeder Nutzer selbst.

[Cyberbob]

Wäre ja schlimm wenn ein "nicht Admin" einfach irgendwelche Systemweiten Sachen machen dürfte

[DelphiSecurity]

Zitat von Cyberbob:

Wäre ja schlimm wenn ein "nicht Admin" einfach irgendwelche Systemweiten Sachen machen dürfte

Man soll ja nur seine EIGENE CMD sperren.

OBEN IST UNLOCK TOOL 1.0! PW: helper

[Bernhard Geyer]

Zitat von DelphiSecurity:

Man soll ja nur seine EIGENE CMD sperren.

Auch wenns unter HKCU liegt heißt es nicht das hier nicht entsprechende lokale Adminrechte nötig wären.

Übrigens: Dein Programm funktioniert vermutlich auch unter NT/2000/XP nicht korrekt wenn der user nur Gast oder Benutzer ist und nicht mindestens in der Gruppe "Hauptbenutzer" ist.

[Cyberbob]

Wertest du die fehler aus? Was sagt die dein Programm denn? Was sagt Windows zu deinem Versuch? Gibts nen Fehler oder funktioniert es einfach nur nicht

[DelphiSecurity]

Zitat von Bernhard Geyer:

Zitat von DelphiSecurity:

Man soll ja nur seine EIGENE CMD sperren.

Auch wenns unter HKCU liegt heißt es nicht das hier nicht entsprechende lokale Adminrechte nötig wären.

Übrigens: Dein Programm funktioniert vermutlich auch unter NT/2000/XP nicht korrekt wenn der user nur Gast oder Benutzer ist und nicht mindestens in der Gruppe "Hauptbenutzer" ist.

NÖ!

Funktioniert selbst als total eigeschränkter User der nicht mal Desktopicons anlegen kann.

[DelphiSecurity]

Zitat von Cyberbob:

Wertest du die fehler aus? Was sagt die dein Programm denn? Was sagt Windows zu deinem Versuch? Gibts nen Fehler oder funktioniert es einfach nur nicht

ERegistryException "Fehler beim setzen der Daten"

[Luckie]

Zitat von DelphiSecurity:

Man soll ja nur seine EIGENE CMD sperren.

Und jetzt erkläre mir mal bitte den Sinn. Wenn ich mir selber den Zugriff auf die Konsole sperren kann, kann ich ihn mir auch wieder geben. Alternativ könnte ich sie einfach nicht benutzen.