{$MODE OBJFPC}{$H+} {$INTERFACES CORBA}