Thema: Delphi TRegistry

Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
 
Delphi 11 Alexandria
 
#7

Re: TRegistry

  Alt 6. Okt 2003, 19:58
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;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat