Wenn Du schreibst, daß .Run sich eben immer gleich wieder beendet, heißt das also, daß Du in den Debugger kommst? Links hast Du blaue Punkte neben den Codezeilen und irgendwo stehst Du an einem Breakpoint in Deinem Code?
Dann kompilier im Zweifel mit Debug-DCUs (im die
RTL mitdebuggen zu können), und wenn er aus .Run sofort wieder rausspringt, stepst Du halt mit F7 rein, und hast außerdem Breakpoints auf allen Deinen Events im TService.