Einzelnen Beitrag anzeigen

MathiasSimmack
(Gast)

n/a Beiträge
 
#10

Re: DWORD aus Registry lesen...

  Alt 30. Mär 2004, 13:17
Mal als Beispiel. Einen anderen DWORD-Wert habe ich auf die Schnelle nicht gefunden:
Delphi-Quellcode:
  if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,
    'SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer',
    0,KEY_READ,reg) = ERROR_SUCCESS) then
  try
    dwType := REG_NONE;
    dwLen := 0;
    
    // Zugriff auf den Wert klappte schon mal
    if(RegQueryValueEx(reg,'NoDriveTypeAutoRun',nil,@dwType,nil,
      @dwLen) = ERROR_SUCCESS) and
    // ist es ein DWORD
      (dwType = REG_DWORD) and
    // mit 4 Bytes Größe
      (dwLen = 4) then
    begin
      // dann noch mal,
      if(RegQueryValueEx(reg,'NoDriveTypeAutoRun',nil,
        @dwType,
        @dwValue, // <-- DWORD-Variable für den Wert
        @dwLen) <> ERROR_SUCCESS) then
      dwValue := 0;
    end;
  finally
    RegCloseKey(reg);
  end;
  
  ShowMessage(Format('Wert von "%s" = %d (%.8x)',
    ['NoDriveTypeAutoRun',dwValue,dwValue]));
Schau doch mal in die viel zitierten Win32-API-Tutorials von Luckie. Da gibt´s ein ganzes Kapitel zum Thema Registry.
  Mit Zitat antworten Zitat