[fpc-devel] {$Interfaces Corba} and TInterfacedObject

[Martin Schreiber]

On Thursday 29 November 2007 11.52, Graeme Geldenhuys wrote:
>
> > > Also, do I have to specify {$Interfaces Corba} in every unit I have,
> > > or is it only needed in the using that defines the interface itself?
> > You need. See eg MSE units. 
>
The {$interfaces corba} in every MSEgui unit is because a FPC bug.

http://www.freepascal.org/mantis/view.php?id=6690

It is fixed now, I will remove the no more needed {$interfaces corba} soon.

> MSEgui implements it's own custom TNullInterfacedObject class which
> isn't reference counted with the usual IUnkown signature.  This is my
> main question. What is the required functions for CORBA?  I know the
> following is required for IUnkown.
>
tnullinterfacedobject is needed in MSEgui for Delphi compatibility because 
Delphi has no corba style interfaces.
I think tobject.getinterface should work with corba interfaces too:

http://www.freepascal.org/mantis/view.php?id=6036

MSEgui has a workaround to query corba style interfaces from typeinfo, please 
use the function getcorbainterface from lib/common/kernel/mseclasses.pas.

Martin