Если частично переведенный на FPC дельфевый проект.
http://sourceforge.net/projects/mtdorb/files/mtdorb/Автор предлагал его сообществу :
http://community.freepascal.org:8080/bboards/message?message_id=278405&forum_id=24097но в ответ получил тишину.
Я потратил часок и кое-что подправил
http://www.likan.uz/uploads/mtdorb.rar но дальше затык - почему-то "UserException" в "/src/orb/exceptins.pas" отказывается принять унаследованные методы IUnknown (хотя они реализованы в унаследованном ORBException->TInterfacedException - тоже чуток пофисил файл - дописал "STDCALL" в имплеметации) .
Есть желающие дофиксить ? Дело-то полезное - IPC промышленного стандарта, а не самопал какой-то. Еще и кроссплатформенный, работает и с Java.
Автор врядли будет допиливать - потому что проект похож на эбэнданед (может и потому что наше коммьюнити поигнорировало).
Собирать под FPC : просто вызывать "make" (я добавил кое-какие ключи компиляции и дифайн "-dFPC" ).
Недостающие файлы "src/orbint/*.pas" (pi_int.pas,..) получаются компиляцией файлов "idl/*" утиллитой IDLTOPAS (в корне моего архива, вместе с ее DLL-ками).
Добавлено спустя 8 минут 47 секунд:Демки показывают впечатляющую простоту реализации и сервера, и клиента - по сравнению с реализацией на "плюсах".