Delphi-Quellcode:
type
TForm1 = class(TForm)
private
{ Private-Deklarationen }
protected
procedure Loaded; override;
public
{ Public-Deklarationen }
end;
...
procedure TForm1.Loaded;
begin
inherited;
ShowMessage('Geladen: ' + self.Name);
end;
Ich habe
procedure TForm1.Loaded;
ausprobiert. Leider keine Veränderung. Der Compiler meldet weiterhin an der Stelle Parent := AParent; die Fehlermeldung: "Zugriffsverletzung bei Adresse 00000000. Lesen von Adresse 00000000."