![]() |
Delphi steuert Word per OLE - Kein RPC Server verfügbar??
Hallo,
nach meiner letzten Frage wurde mir toll geholfen hier im Forum. Nun ein neues Problem. Aus meinem Programm (unter D5) starte ich WORD2000 und verschiedene Dateien. Schliesst nun jemand diese Dateien und ich versuche über mein Programm den selben Aufruf von WORD so bekomme ich die Meldung "RPC-Server" nicht verfügbar. Beende ich mein Programm und starte es neu läuft wieder alles. Wo kann das Problem liegen? Hat wieder jemand einen Tipp für mich? Jedenfalls schon mal danke im Vorfeld und Gruß - Stargate3 |
Wenn jemand Word beendet, so musst Du Deine WordApplication einfach neu verbinden:
Code:
Dein Objekt von WordApplication kümmert sich da nicht automatisch drum.
WordApplication.Connect
|
RPC Server nicht vorhanden
Hallo Mario,
danke für deinen Tipp, aber eigentlich mache ich das beim neuen Aufruf im Programm. Also zum Ablauf: Im Programm wird eine Proc. aufgerufen in der TWordApplication.Connect darauf folgen Anweisungen... Word dokument wird geöffnet, umbenannt und unter neuen Namen gespeichert. Ende Procedure. Neuer Aufruf dieser Procedure und wieder wird TWordApplication.Connect aufgerufen und ein weiteres Word Document wird geöffnet usw. Schliesst nun jemand alle Word Dokumente und ich rufe im Programm diese Procedure auf so bekomme ich die Meldung "kein RPC Server" vorhanden. Noch nen Tipp? Gruß |
Bloss eine Idee, vielleicht da einfach mal so machen:
Code:
Falls das nicht fruchtet. Das WordApplication-Objekt hat auch ein OnClose. Da kannst Du dann entsprechend reagieren. Ein sauberer Disconect an der Stelle und alles ist in Butter.
WordApplication.DisConnect
WordApplication.Connect |
Joh, Danke, werd ich mal probieren mit "OnClose",
daran hatte ich noch nicht gedacht. Gruß Stargate3 |
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:35 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz