TRegistry

[Christian Seehase]

Moin Hoeppi,

bei OpenKeyReadOnly gibt es nur einen Parameter, nämlich den Key. Da ja in jedem Falle nur gelesen wird, macht es keinen Sinn das Anlegen des Keys vorzusehen.
Ausserdem hab' ich noch eine kleine Korrektur:

Delphi-Quellcode:

  try
    Reg.RootKey := HKEY_CLASSES_ROOT;
    if not Reg.OpenKeyReadonly('\.ppt') then
    begin
      //pptv install
      pb_test.Caption := '&install'
    end else begin
      Reg.CloseKey;
    end;
  finally
    Reg.Free;
  end;

Den Key nur zu schliessen, wenn er auch geöffnet wurde ist sauberer.
Passiert zwischen öffnen und schliessen des Keys noch mehr, könnte es dann etwas umfangreicher aussehen:

Delphi-Quellcode:

    end else begin
      try
        // Mit dem geöffneten Key arbeiten
      finally
        Reg.CloseKey;
      end;
    end;