> for descendants of TObject, there's a method 'ClassType', e. g.
> 
> ***
> begin
>   if MyObject.ClassType = CCalculator then begin
>     bla bla
>   end else bla bla
> end;
> ***
> 
> see reference manual - system unit. this only works if a descendant of 
> TObject has been assigned to MyObject.
> 
> Anton.
Thanks. ^_^  I just maid my base class a descendant of TObject and that 
took care of it!

_______________________________________________
fpc-pascal maillist  -  [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to