Prüfen, ob Klasse "Created" wurde

[Christian Seehase]

Moin Mirage,

um das Problem zu umgehen gibt es in neueren Delphi Versionen FreeAndNil. Das macht im Prinzip nichts anderes als .Free mit anschliessendem := nil.

Delphi-Quellcode:

var
  btn : TButton;

begin
  btn := TButton.Create(self);
  try
    // mach was mit dem Button
  finally
    FreeAndNil(btn);
    // oder
    btn.Free;
    btn := nil;
  end;
end;