Vinzent Höfler wrote:
And then inside the implementation:
TNokia3720Phone.SomeMethod;
begin
case self.Edition of
n3720peStandard:
ImplementedThatWay;
n3720peDeluxe:
ImplementedThisWay;
end;
end;
When you are phone manufacturer you know you model line very well. So
you can define final classes and intermediate very well. If
implemenetation is different then you are free to use
TNokia3720PhoneStandard = class sealed(TNokia3720Phone)
TNokia3720PhoneDeluxe = class sealed(TNokia3720Phone)
and ofcource in this case TNokia3720Phone becomes not sealed.
I don't want to continue this discussion. Moreover I don't ask anybody
to use it if they find this not useful. Those who need it will use it.
What's the problem after all?
Best regards,
Paul Ishenin.
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel
