🚀 go-pugleaf

Inside a class procedure Self refers to class, not instance. So Self.Create
is, as the message states, a "polymorphic constructor calls".
This requires a polymorphic constructor that is TBaseWinForm.Create is to be
virtual and TBaseGridWinForm.Create its override.
Unfortunately, I think this upsets poor WinForm designer.
Probably you can solve the matter using a second named constructor chain,
that is
TBaseWinForm.VirtualCreate ... vitual, TBaseGridWinForm.VirtualCreate ...
override. That way

with Self.VirtualCreate do  begin
   Show;
end

should compile and work as intended.


"Stefanidis Dimitris" <distef01@yahoo.gr> wrote in message
news:4163d1ef$1@newsgroups.borland.com...
> Hello
>
> I'm creating an winForm as TBaseWinForm. Then i'm creating an child of it
as
> TBaseGridWinForm with an Grid on it.
> I'm adding class procedure on TBaseWinForm as CreateShow as
> with TBaseWinForm.Create do
>  begin
>   Show;
>  end
>
>
> When i call TBaseGridWinForm.CreateShow i saw only TBaseWinForm.
> Ok lat's say this happens becouse of  "TBaseWinForm.Create". But when i
try
> classic delphi
> call : With Self.Create do and etc than i get an compile error as :
> "Potentially polymorphic constructor calls must be virtual"
>
>
> Any ideas ???
>
> Thanks Dimitris