Thema: Delphi Tstrings ??

Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

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

Re: Tstrings ??

  Alt 27. Okt 2003, 22:18
Moin Skyruner,

wenn ich mir den Codeschnipsel aus dem Eingangsposting ansehe:
Es fehlen nicht nur CloseKey und ein try/finally Block, sondern auch noch die Freigabe des Registry Objektes, die Überprüfung, ob das Öffnen des Schlüssels erfolgreich war, denn nur in diesem Falle kann man damit arbeiten, und darf den Key schliessen, ausserdem auch noch ein try/finally Block, um die Freigabe abzusichern.

Stilisiert:

Delphi-Quellcode:
R := TRegistry.Create;
try
  if R.OpenKey(...) then begin
    try
      // mach was mit dem geöffneten Key
    finally
      R.CloseKey;
    end;
  end;
finally
  FreeAndNil(R);
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