Erstmal ist es sowieso möglich FMX und
VCL zu mischen
und dann läuft in deinem Fall doch eh nicht Beides gleichzeitig, also egal.
TService baut ja auf der
VCL auf, aber normal bekommst du davon nix mit.
Warum Halt?
Wieso den Code nicht direkt im
DPR-Maincode, bzw. warum nicht einen Boolean-Result und bei False den nachfolgenden Code überspringen?
PS: ServiceApplication.Run beendet sich ja sofort wieder, wenn die Service-Anwendung nicht als Service gestartet wurde.
Drum hab ich mir den Code vom Run nachgebaut und wenn Parameter -DEBUG, erstelle ich ein DummyFenster mit einem Beendenknopf
und führe dann den Code meines TService-Klasse aus, um so sen Service einfach debuggen zu können (-DEBUG in den Startparametern des Projekts)
Man könnte aber auch zusätzlich/stattdessen auf
IsDebuggerPresent prüfen.