Call MsgIn ( Message : 
                       ...
           )
With Thread_context = . ..