Dienst/Service oder VCL-Anwendung

[ele]

Ich schreibe meine Server-Anwendungen immer als Service mit Webinterface. Über das Webinterface steuert, überwacht und konfiguriert man den Service.

Die Komplette Logik ist in einer Klasse abgelegt die etwa so aussieht:

Delphi-Quellcode:

  TServiceState = (ssStopped, ssRunning, ssPaused);
  TServiceClass = class( TObject )
  protected
    FState: TServiceState;
    FIsService: Boolean;
    function GetServiceName(): String; virtual;
    function GetDisplayName(): String; virtual;
    function GetDescription(): String; virtual;
  public
    constructor Create(); virtual;
    destructor Destroy(); override;

    procedure Start(); virtual;
    procedure Stop(); virtual;
    procedure Pause(); virtual;
    procedure Resume(); virtual;
    procedure Restart(); virtual;
    procedure Execute(); virtual;

    property State: TServiceState read FState;
    property ServiceName: String read GetServiceName;
    property DisplayName: String read GetDisplayName;
    property Description: String read GetDescription;
    property IsService: Boolean read FIsService;
  end;

(In der Realität ist das ganze etwas komplizierter, ich kann aber meine Vorlage nicht einfach so open source stellen. Aber es geht hier ums Prinzip.)

Dann habe ich zwei Projekte - ein VCL Projekt und ein Service - die jeweils die Funktionen in der oben genannten Klasse aufrufen. Somit Programmiert man die Logik nur einmal, kann sie im VCL Projekt testen und debuggen und hat dann für den produktiven Betrieb einen Service.

Das macht das Entwickeln eines Services wesentlich einfacher. Allerdings muss man aufpassen, da ein Service eben nicht ganz unter den selben Bedingungen läuft wie eine übliche Windows Applikation. Das betrifft z.B. das aktuelle Verzeichnis, Window Handles (versuch mal Window Messages in einem Service zu behandeln) und z.B. darf man nicht vergessen CoInitialize() aufzurufen wenn man COM benutzen will (direkt oder indirekt). Auch läuft ein Dienst in der Regel unter dem System Benutzer, was andere Zugriffsrechte zur Folge hat. Z.B sind Netzlaufwerke die man eingerichtet hat unter dem Systembenutzer nicht zugänglich.

[Jens Hartmann]

Hallo und schöne 1. Weihnachten zusammen.

Zitat von Sir Rufo:

Ich habe hier ein Tutorial gefunden (englisch)
http://www.tolderlund.eu/delphi/service/service.htm

Danke erstmal, trotz englisch bin ich recht gut damit zurecht gekommen. Also ich denke, der Lösungsansatz "Dienst mit Threads" scheint mir am besten für mein Programm geeignet. Allerdings habe ich ein kleines Verständnisproblem. Ich habe jetzt mal meine ersten Threads geschrieben. Und auch dazu ein gutes Tutorial gelesen.
http://www.michael-puff.de/Programmi...mit_Delphi.pdf

Ich würde jetzt gerne eine VCL-Anwendung mit den entsprechenden Threads schreiben und anschließend den Dienst erstellen. Hierzu, so habe ich das zumindestens Verstanden, muss ich natürlich die gesamten Funktionen die ich benötige in die Threads auslagern. Das würde für mich bedeuten, ich müsste die Komponente CPortLib "ComPort" zur Laufzeit in dem Thread erzeugen.

Geht sowas, und wie macht man sowas. Findet man dazu was im Netz. Viel muss der Thread ja nicht machen, er muss lediglich den entsprechende ComPort erzeugen, diesen öffnen und anschließende Daten von der Com-Schnittstelle lesen. Zusätzlich müssten dies in eine Datenbank geschrieben werden. Also brauchte ich wahrscheinlich auch eine TZConnection und Query, die ich zur Laufzeit erzeuge.

Hmmm...

Oder legt man die Komponenten einfach auf die VCL-Form und in den Dienst und grieft über den Thread darauf zu. Das würde ja bedeuten, das die Kompos in der VCL-Anwendung und im Dienst den selben Namen haben müssten.

Mann ist das alles kompliziert. Ich hoffe ich konnte mein Vorhaben einigermaßen beschreiben.

Also nochmal schöne Weihnachten und Gruß Jens

[Bummi]

Die üblichen "Portkomponenten" arbeiten intern ohnehin schon gethreaded und liefern die Daten in einem Synchronized-Paket.
Vielleicht machst Du es Dir etwas einfacher wenn Du Komponenten und Logik in einem Datenmodul ablegst, dieses kannst Du auch in einem Dienst und/oder einer Desktopanwendung verwenden.

[Jens Hartmann]

Zitat von Bummi:

Die üblichen "Portkomponenten" arbeiten intern ohnehin schon gethreaded und liefern die Daten in einem Synchronized-Paket.
Vielleicht machst Du es Dir etwas einfacher wenn Du Komponenten und Logik in einem Datenmodul ablegst, dieses kannst Du auch in einem Dienst und/oder einer Desktopanwendung verwenden.

Hört sich logisch an, und damit hätte ich auch keine Problem das zu realisieren. Stellt sich für mich die Frage, welcher der Bessere oder vieleicht anders gesagt sinnvollste Weg ist?

Gruß Jens