AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Mehre Excel Instanzen Verwalten.

Ein Thema von LebensAdler · begonnen am 10. Okt 2016 · letzter Beitrag vom 10. Okt 2016
 
nahpets
(Gast)

n/a Beiträge
 
#3

AW: Mehre Excel Instanzen Verwalten.

  Alt 10. Okt 2016, 17:09
Hier mal sowas in der Art (nur mit Word):
Delphi-Quellcode:
function tForm1.DokumentOeffnen(
  aWordDocument : TWord11Document;
  aDateiname : String;
  aVisible : Boolean = false) : Boolean;
var
  vDateiname : OleVariant;
  vVisible : OleVariant;
  vFalse : OleVariant;
begin
  try
    vDateiname := aDateiname;
    vVisible := aVisible;
    vFalse := False;
    WordApplication.Connect;
    WordApplication.Documents.Open(vDateiname, EmptyParam, vFalse, vFalse,
                                   EmptyParam, EmptyParam, EmptyParam, EmptyParam,
                                   EmptyParam, EmptyParam, EmptyParam, vVisible,
                                   EmptyParam, EmptyParam, EmptyParam, EmptyParam);
    aWordDocument.ConnectTo(WordApplication.ActiveDocument);
    Result := True;
  except
    on e : Exception do begin
      Result := False;
    end;
  end;
end;
Dieser Funktion wird eine Variabel vom Typ TWord11Document übergeben. Von denen gibt es im Programm mehrere. Das Ganze ist mit Delphi 7 geschrieben und nutzt Word_TLB.

Mit Excel müsste das analog auch gehen. Für jede Exceldatei 'ne eigene Variabel.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:44 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