Resource wird nicht gefunden

[Sir Rufo]

• Die Instanz wird nicht erzeugt, wenn im constructor eine Exception kommt.
• Die Instanzvariable ist eine lokale Variable und somit nicht initialisiert => da steht irgendwas drin.
• Assigned liefert true wenn in der Instanzvariable irgendwas drin ist <> nil
• TObject.Free prüft selber auch noch mal ob <> nil
• Es kann nicht festgestellt werden, ob die Instanzreferenz auf irgendeine Grütze oder eine intakte Instanz zeigt
• Zeigt die Referenz auf Grütze, dann knallt es

Darum lautet das Pattern auch so

Delphi-Quellcode:

procedure bar;
var
  foo: TObject;
begin
  foo := TObject.Create;
  try
    ...
  finally
    foo.Free;
  end;
end;

oder

Delphi-Quellcode:

procedure bar;
var
  foo: TObject;
begin
  foo := nil;
  try
    foo := TObject.Create;

    ...
  finally
    foo.Free;
  end;
end;