Einzelnen Beitrag anzeigen

jodahush

Registriert seit: 24. Aug 2006
18 Beiträge
 
#16

AW: Autostart unter Windows 7

  Alt 18. Mär 2012, 18:55
Gut

ok, auf der Form Steht beim Start: Autostart nicht gefunden.

Der Code läuft bis:
class function TAutostart.InternalModifyEntryDirect(const ADescription, ACommand: string; const ALocation: TEntryLocation;
AOperation: TEntryOperation): Boolean;
var
Reg: TRegistry;
begin
Result := False;
Reg := TRegistry.Create(KEY_ALL_ACCESS or KEY_WOW64_64KEY);
try
Reg.RootKey := cRegRoot[ALocation];
if Reg.OpenKey('Software\Microsoft\Windows\CurrentVer sion\' + cRegLocation[ALocation], AOperation = eopCreate) then // hier steigt delphi aus
//die Abfrage gibt wohl false zurück und..

begin
if AOperation = eopCreate then
Reg.WriteString(ADescription, ACommand)
else if Reg.ValueExists(ADescription) then
Reg.DeleteValue(ADescription);
Result := True;
Reg.CloseKey;
end; //hier geht es weiter
finally
Reg.Free;
end


Einen Log mit dem Process Monitor...gibt es diesen schon mit Delphi 7? Ich kenne den PM noch nicht.

Geändert von jodahush (18. Mär 2012 um 18:57 Uhr)
  Mit Zitat antworten Zitat