Try - except - finally

[Der schöne Günther]

Als kleiner Einwurf der hier garantiert niemanden wirklich weiterbringt: In den ersten Tagen (Wochen?) Delphi habe ich mich auch immer wieder daran gerieben, kein try-except-finally zu haben. Um ehrlich zu sein, gefällt mir der Delphi-Weg mittlerweile besser, es ist einfach nur eine Gewöhnungssache.

Mir ist im Nachhinein auch aufgefallen dass wenn mich das rein optisch (von der Einrückung) her anfing zu stören, meine Methoden eh viel zu lang waren.

PS: Wann kommt endlich ARC auf den Desktop? Damit spart man sich wohl endlich 95% aller

Delphi-Quellcode:

Referenz := TObject.Create();
try
  [...]
finally
  Referenz.Destroy();
end;

sparen

[silver-moon-2000]

Zitat von Der schöne Günther:

Delphi-Quellcode:

Referenz := TObject.Create();
try
  [...]
finally
  Referenz.Destroy();
end;

sparen

Jetzt mal blöd gefragt,
fliegt Dir das nicht doch noch um die Ohren, wenn die Erzeugung von Referenz fehlschlägt?
Sollte man nicht besser Referenz.Free aufrufen,
denn das prüft doch noch auf <> nil , bevor es destroy aufruft?
Oder denke ich falsch?

[mkinzler]

Ja, .Destroy() sollte man nie direkt aufrufen.

[Der schöne Günther]

Zitat von silver-moon-2000:

Zitat von Der schöne Günther:

Delphi-Quellcode:

Referenz := TObject.Create();
try
  [...]
finally
  Referenz.Destroy();
end;

sparen

Jetzt mal blöd gefragt,
fliegt Dir das nicht doch noch um die Ohren, wenn die Erzeugung von Referenz fehlschlägt?
Sollte man nicht besser Referenz.Free aufrufen,
denn das prüft doch noch auf <> nil , bevor es destroy aufruft?
Oder denke ich falsch?

Ich sehe hier kein Problem. Wenn ich in den try-Block reinkomme, war der Konstruktor erfolgreich und es gibt eine gültige Referenz.

Fliegt der Konstruktor bereits raus, wird der try-Block erst garnicht ausgeführt (aber der Destruktor des Objekts aufgerufen).

[Furtbichler]

Alles richtig, Günni.