AW: Dateivorschau
Hallo,
Mit getAtiveOleObject erhält man die IDispatch -Schnittstelle des aktuellen OLE-Objects. Falls das OLE-Object existiert (hier Excel/Word) kann man das OLE-Object mit Quit schließen. (Quit muss natürlich vom OLE-Object bereitgestellt werden). Wenn das OLE-Object nicht existiert wird es im EXCEPT-Block erzeugt und dann geschlossen (setzt vorraus das Excel/Word installiert). Der Code ist jetzt einfach gehalten. Wenn man mit getActiveOleObject arbeitet schließt er die aktuelle Instanz. (Excel/Word mehrfach starten, dann im Taskmanager beobachten). http://docwiki.embarcadero.com/Libra...ctiveOleObject https://docs.microsoft.com/de-de/vis...w?view=vs-2019 Gruß |
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:43 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