Einzelnen Beitrag anzeigen

Benutzerbild von Andidreas
Andidreas

Registriert seit: 27. Okt 2005
1.110 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#10

AW: Probleme beim Auslesen von Registry Keys

  Alt 7. Okt 2015, 14:26
@Sir Rufo & himitsu

Danke für die Info, so gehts nun:

Delphi-Quellcode:
procedure TForm1.Button30Click(Sender: TObject);

var
regKey : TRegistry;

begin

  //Create Object
  regKey := TRegistry.Create(KEY_READ OR KEY_WOW64_64KEY);

  Try
    //Set Root Key
    regKey.RootKey := HKEY_LOCAL_MACHINE;

    //Open Registry Key
    If Not(regKey.OpenKeyReadOnly('SOFTWARE\Microsoft\Windows\CurrentVersion\WindowsUpdate\Auto Update')) Then
    Begin
      MessageDlg('Could not open Registry Key!', mtError, [mbOK], 0);
    End Else
    Begin
      //Read Registry Key
      ShowMessage(regKey.ReadString('NextDetectionTime'));
    End;

    //Close Registry Key
    regKey.CloseKey();
  Finally
    regKey.Free;
  End;

end;
Ich habe zum Testen den NextDetectionTime Schlüssel verwendet... An diesen Wert komm ich jetzt schon mal ran, jetzt muss ich das ganze nur noch auf einem Rechner mal Testen bei dem Updates anstehen und der AUState Schlüssel vorhanden ist
Ein Programmierer Programmiert durchschnittlich 15 Code Zeilen pro Tag
Wir sind hier doch nicht bei SAP!!!

Aber wir habens bald
  Mit Zitat antworten Zitat