Fehlermeldung : eine geringere Sichtbarkeit (private) ?

[thomas2009]

Hallo

ich erhalte diese Fehlermeldung an diese Zeile, was ich nicht versehen konnte !

Delphi-Quellcode:

procedure TForm2.FormResize(Sender: TObject);
begin
Form2.Edit1.Text := IntToStr(Form1.Width); // Fehler-Zeile
Form2.Edit2.Text := IntToStr(Form1.Height);

end;

[Hinweis] Unit2.pas(40): Durch das Überschreiben erhält die virtuelle Methode 'TForm2.CreateParams' eine geringere Sichtbarkeit (private) als die Basisklasse 'TForm' (protected)