Forum: Win32/Win64 API (native code)
Delphi
by marabu,
11. Jul 2007
Ach, es ist alles noch viel schlimmer: Wird SvcMgr eingebunden, dann existieren sogar zwei Application-Objekte. Vergesst meinen Vorschlag, er war nicht sehr durchdacht. Wenn ihr bis morgen früh keine Lösung findet, dann denke ich nochmal drüber nach.
Gute Nacht
Forum: Win32/Win64 API (native code)
Delphi
by marabu,
11. Jul 2007
Herzlich willkommen in der Delphi-PRAXiS, Kowelenz.
Du könntest einfach den Typ von Application abfragen:
if Application is TServiceApplication then
ShowMessage('Wir sind Service')
else
ShowMessage(Application.ClassName);