Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Systemfehler 1722: RPC Server nicht verfügbar. (https://www.delphipraxis.net/210829-systemfehler-1722-rpc-server-nicht-verfuegbar.html)

BlueStarHH 17. Jun 2022 11:10

Systemfehler 1722: RPC Server nicht verfügbar.
 
Hi,

direkt nach dem Application.Run wird ein Fehlerdialog angezeigt:

Code:
Systemfehler. Code: 1722.
RPC Server ist nicht verfügbar
Kein Code von mir und auch Form.OnShow wird nicht aufgerufen. Hat jemand eine Idee was das sein kann?
(Hab schon geprüft, wie in anderen Lösungen vorgeschlagen, ob der DCOM-Dienst läuft: Ja, tut er.)

TiGü 17. Jun 2022 11:41

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Debug-DCUs einschalten und sich durch TApplication.Run durchsteppen schon gemacht?
Läuft er denn zumindest durch FMainForm.Show; bzw. FMainForm.Visible := True;?


Delphi-Quellcode:
procedure TApplication.Run;
begin
  FRunning := True;
  try
{$IF NOT DEFINED(CLR)}
    AddExitProc(DoneApplication);
{$ENDIF}
    if FMainForm <> nil then
    begin
      case CmdShow of
        SW_SHOWMINNOACTIVE:
          begin
            FInitialMainFormState := wsMinimized;
            FMainForm.FWindowState := wsMinimized;
          end;
        SW_SHOWMAXIMIZED: MainForm.WindowState := wsMaximized;
      end;
      if FShowMainForm then
        if (FMainForm.FWindowState = wsMinimized) or (FInitialMainFormState = wsMinimized) then
        begin
          Minimize;
          if (FInitialMainFormState = wsMinimized) then
            FMainForm.Show;
        end else
          FMainForm.Visible := True;
      repeat
        try
          HandleMessage;
        except
          HandleException(Self);
        end;
      until Terminated;
    end;
  finally
    FRunning := False;
  end;
end;

BlueStarHH 17. Jun 2022 11:47

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Zitat:

Zitat von TiGü (Beitrag 1507454)
Debug-DCUs einschalten und sich durch TApplication.Run durchsteppen schon gemacht?
Läuft er denn zumindest durch FMainForm.Show; bzw. FMainForm.Visible := True;?[/DELPHI]

Kann ich nicht testen, da das auf einem Kunden-PC passiert.

mjustin 17. Jun 2022 11:56

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Muss ein DCOM Server nicht zuerst auf dem Client registriert werden?
Dann würde ich die Registry-Einstellungen auf dem Client prüfen, eventuell sind die Angaben für den Server fehlerhaft (oder verloren gegangen)

TiGü 17. Jun 2022 11:57

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Kein Code von dir und kein FormShow hast du dann per Log-Ausgaben ermittelt?

TiGü 17. Jun 2022 12:00

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Kein Plan was du dir schon ergooglet hast, daher drei Links zum probieren:

https://www.der-windows-papst.de/202...pc-error-1722/
https://www.gradenegger.eu/?p=68
https://www.mcseboard.de/topic/21846...r_unavailable/

himitsu 17. Jun 2022 12:08

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Zitat:

Zitat von BlueStarHH (Beitrag 1507452)
Kein Code von mir

Irgendeine Komponente auf der Form? :stupid:

MAPI, Webbrowser, OLE/ActiveX-Komponente, ..................




Irgendwas wird ja das RPC_S_SERVER_UNAVAILABLE auslösen.

AWeber 17. Jun 2022 16:41

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Hallo,
die Meldung kommt auch zuweilen aus printers! Wenn aus welchem Grund auch immer der Druckerspooler Dienst beendet wurde.
André

ZYLAGON 17. Jun 2022 17:42

AW: Systemfehler 1722: RPC Server nicht verfügbar.
 
Ich kenne den Fehler 'RPC Server ist nicht verfügbar' wenn auf Excel zugegriffen wird nachdem die Excel-Instanz beendet wurde.
Die dazu führenden Umstände konnte ich jetzt nicht nochmals produzieren, aber es hing ganz sicher damit zusammen.

VG ZYL


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:53 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz