EAccessViolation abfangen

[Andreas L.]

Ok, mein Code lautet nun so:

Delphi-Quellcode:

function RemovePanel:Boolean;
begin
 if MarkedPanel.ClassType=TPanel then
  begin
  FreeAndNil(MarkedPanel);
  Result:=True;
  end
 else
  begin
   Result:=False;
  end;
end;

Klappt wunderbar