1 files changed, 35 insertions, 0 deletions
diff --git a/TAO/examples/Borland/ReceiverImpl.cpp b/TAO/examples/Borland/ReceiverImpl.cpp
new file mode 100644
index 00000000000..32b67bf4f0a
--- /dev/null
+++ b/TAO/examples/Borland/ReceiverImpl.cpp
@@ -0,0 +1,35 @@
+// $Id$
+//---------------------------------------------------------------------------
+#include "pch.h"
+#pragma hdrstop
+#include "ChatClientWnd.h"
+#include "ReceiverImpl.h"
+//---------------------------------------------------------------------------
+TReceiverImplementation::TReceiverImplementation ()
+  : orb_ (0)
+{
+}
+//---------------------------------------------------------------------------
+TReceiverImplementation::~TReceiverImplementation ()
+{
+}
+//---------------------------------------------------------------------------
+void TReceiverImplementation::message (const char* msg) throw (CORBA::SystemException)
+{
+  ::PostMessage (ChatClientWindow->Handle,
+                 WM_MESSAGE_RECEIVED,
+                 (WPARAM) new String (msg),
+                 (LPARAM) 0);
+}
+//---------------------------------------------------------------------------
+void TReceiverImplementation::shutdown () throw (CORBA::SystemException)
+{
+  // Instruct the ORB to shutdown.
+  orb_->shutdown (0);
+}
+//---------------------------------------------------------------------------
+void TReceiverImplementation::orb (CORBA::ORB_ptr o)
+{
+  orb_ = CORBA::ORB::_duplicate (o);
+}
+//---------------------------------------------------------------------------