<div dir="ltr"><div><div>Hi all!!</div><div><br></div><div>I'm creating a new form class with some extra features, derived from TCustomForm. But when I override the procedure CreateWnd to register the new instance of my form class as the main form of the application, I receive a warning talking that my form class (TSecureForm) and TForm are not related. The CreateWnd code is:</div><div><br></div><div><br></div><div>procedure TSecureForm.CreateWnd;</div><div>begin</div><div>  if (Application<>nil) then</div><div>    Application.UpdateMainForm(TForm(Self));</div><div>  inherited CreateWnd;</div><div>end;</div><div><br></div><div>So, I take a look into TApplication.UpdateMainForm and I see: </div><div><br></div><div>procedure TApplication.UpdateMainForm(AForm: TForm);</div><div><br></div><div><br></div><div>My question is: The parameter AForm should be of type TCustomForm instead of TForm?</div><div><br></div>-- <br><div class="gmail_signature">The best regards,<br><br>Fabio Luis Girardi<br>PascalSCADA Project<br><a href="http://sourceforge.net/projects/pascalscada" target="_blank">http://sourceforge.net/projects/pascalscada</a><br><a href="http://www.pascalscada.com" target="_blank">http://www.pascalscada.com</a></div>
</div></div>