Läuft Comserver bereits

[hanspeter]

Hallo,

ich habe eine Exe-File mit Com-Serverfunktionen erweitert.
Also einen OutofProcess-Server.

Mit

Delphi-Quellcode:

procedure TForm1.Button9Click(Sender: TObject);
var
  imp : IImageImport;
begin
  Imp :=   CoImageImport.Create;
  Imp.SaveImage('Hallo','','');
  Imp := nil;
end;

rufe ich den Server auf und das klappt auch problemlos.

Wie kann ich aber prüfen, ob der Server, der ja ein normales Anwendungsprogramm ist,
bereits läuft und diesen dann aufrufen?

Für einen Tip dankbar.

Gruß
Peter

[moelski]

Moin !

Zitat:

Wie kann ich aber prüfen, ob der Server, der ja ein normales Anwendungsprogramm ist,
bereits läuft und diesen dann aufrufen?

Das ist doch eigentlich unnötig.

Entweder der ComServer läuft nicht -> dann wird er beim Zugriff auf das ComObjekt gestartet, oder er läuft und das ComObjekt greift direkt auf die laufende Instanz zu.
Ob und wann der ComServer (neu) gestartet wird hängt auch von den Einstellungen ab. Du kannst ja bei der Erstellung des ComServers angeben welche Instantiierung genutzt werden soll.

[hanspeter]

Das ist doch eigentlich unnötig.

Wenn der Server bereits läuft, hängt das rufende Programm und nach einem timeout kommt die Fehlermeldung
OLESysError "Starten des Servers fehlgeschlagen".

Peter

[moelski]

Moin !

Hmm, erlaubst du ggf. nur eine Instanz des COM Servers?

Zu dem Fehler selber kann ich dir leider wenig sagen. Bei mir hat das (wie in meinem Posting beschrieben) bisher immer geklappt.