I found a tool on MapInfo-L, that might help you out.
The tool UpdateAzimuth can be found in this thread: https://groups.google.com/forum/#!searchin/mapinfo-l/bearing%7Csort:date/mapinfo-l/7vfZWb1ZkNM/Gtq57J6CEwAJ
It does however require that you have a table with simple lines which then will get a new column added that is updated with the bearing.
He is a process that can help you create the input table for the tool:
1. Make a copy of your original table. Preferable it should have a unique ID column if you want to get the bearing back to the original table.
2. Open the copy, now referred to as _COPY.
3. Use the MapBasic window to update to create lines for each record towards the single point where 1234.456, 23456.678 should be replaced with the coordinates of the point. Copy and paste these two statements into the MapBasic window, select the statements again and hit the Enter key on the keyboard.
Set CoordSys Table _COPY
Update _COPY Set OBJ = CreatLine(CentroidX(OBJ), CentroidY(OBJ), 1234.456, 23456.678)
4. Save your changes to the _COPY table
5. Run the UpdateAzimuth tool