File open Problem

[Danccce]

Hallo zusammen,

ich habe ein kleines Problem ein File zu öffnen:

So gehts:

Code: Alles auswählen

vWDocument := vMSWord.Documents.Open('C:\Dokumente und Einstellungen\Office\Eigene Dateien\Quittungsdrucker\Templates\Quittung.docx');

So leider nicht:

Code: Alles auswählen

FileName:='C:\Dokumente und Einstellungen\Office\Eigene Dateien\Quittungsdrucker\Templates\Quittung.docx';
vWDocument := vMSWord.Documents.Open(FileName);

Was mache ich falsch? Da ich den FileName (ist ein string) später aus dem aktuellen Pfad zusammensetzen möchte ist ein fester String nicht machbar.

Vielen Dank!

[Danccce]

Hat sich erledigt!


Da es ein ein OLE aufruf war durfte kein String sondern OLEVariant übergeben werden:

Code: Alles auswählen

var
  vMSWord, vWDocument, vWText : OLEVariant;
  FileName                    : OLEVariant;
begin
  try
  FileName:=extractfilepath(ParamStr(0))+'\Templates\Lastschrift.docx';
  vMSWord    := CreateOleObject('Word.Application');
  vWDocument := vMSWord.Documents.Open(FileName);

Trotzdem Danke...
Bis bald und schönen Karneval aus dem Rheinland