Console oder Dienst

[Luckie]

dann wirst du ganze Codeblöcke per Compilerschalter aus- bzw- einkommentieren müssen. Und ob dass dann übersichtlicher ist als zwei getrennte Anwendungen? Die Funktionalität kann man bzw. sollte man auch in eine extra Unit/Klasse auslagern, welche man dann von beiden Anwendungen aus einbinden kann. So muss nur ein Code gepflegt werden und nur jeweils die zugehörigen Anwendungen neu kompiliert werden.

[Dezipaitor]

Du kannst den Dienstcode in einer Konsole ausführen lassen. Dazu einfach direkt den Code im Hauptprogramm aufrufen. Du willst ja Compilerdirektiven verwenden, dann kannst du mit IFDEF usw das machen.
Zudem kannst du in Delphi 200x Kopien der Einstellungen im Projektmanager anfertigen und dort dann die Compilerdirektive verwenden.
Da gibt es z.B. Debug und Release und du könntest noch Debug Console und Release Console hinzufügen und dort die notwendige Compilerdirektive in den Einstellungen setzen.

Natürlich kannst du keine Dienstspezifischenaufrufe machen, z.b. den Servicemanager (Stop, Start, Pause, Parameter).

Delphi-Quellcode:

{$IFNDEF CMD}  
      SvcMgr.Application.Initialize;
      SvcMgr.Application.CreateForm(...);
      SvcMgr.Application.Run;      
  {$ELSE}
      SV := TServiceThread.Create;
      Sv.DoExecute(); //ruft intern Execute auf, da es nicht sichtbar ist
  {$ENDIF}