Service oder Anwendung

[GuenterS]

Dann mach das Define in den Projekteinstellungen dann sollte es funktionieren.

[Assertor]

Hallo,

ist zwar schon ein paar Monate alt, aber ich hatte gerade das gleiche Problem:

Einfach eine Unit anlegen, die einen String aufnimmt. Dann im Oncreate des MainForms (egal ob Application oder Service) diese Unit einbinden und den String setzen (als FGlobalAppType := Application.Classname);

Wenn man nun die Unit in anderen Units einbindet, muß kein Forms oder SvcMgr mit rein. Man prüft den String per Function auf TServiceApplication und gut ist.

@marabu: Die Idee war super ohne das wäre ich darauf nicht gekommen.

Gruß winkel79