| { Send the event message to a Trinc-Prolog engine, not use
the "WM_COPYDATA" message identifier but use "WM_EVENT_TRINC_PROLOG" } SendMessage( TP_DESTINATION_WINDOW, WM_EVENT_TRINC_PROLOG, Call^._EngineId, Integer(@ExtEvent) ); { Free the memory block } TP_MEMFREE( ExtEvent._GoalPtr ); |