Board index » delphi » OLE Objects in WinWord with $

Peter A. Smolik

Delphi Developer
Sat, 17 Apr 1999 03:00:00 GMT

OLE Objects in WinWord with $

Sorry,

I'am looking for an way to resolve this special contruct to read the Title
and other Information from a Winword OLE Object.

var V:Variant;
    Peter:string;
begin
V := CreateOleObject('Word.Basic');
V.Datei?ffnen('j:\ROUTER.DOC',,1);
Peter:=V.AbrufenDokumentEigenschaft$('Titel');
V.DateiSchlie?en;

V.AbrufenDokumentEigenschaft$('Titel') means the german Form of the ??
GetDocumentAttributes$('Title');  I hope my english translation of this
Funktion are correct.

Delphi says he could not use the Character $ for OLE .

Is there any way to use this OLE Function?

Thanks and regards

Peter

 
The Graphical Gno

Delphi Developer
Mon, 19 Apr 1999 03:00:00 GMT

Re:OLE Objects in WinWord with $


In article <01bbc5c1$94a32360$7d0101c0@pcdw25>, "Peter A. Smolik" <gl...@via.at> wrote:

Quote
>Sorry,

>I'am looking for an way to resolve this special contruct to read the Title
>and other Information from a Winword OLE Object.

>var V:Variant;
>    Peter:string;
>begin
>V := CreateOleObject('Word.Basic');
>V.Datei?ffnen('j:\ROUTER.DOC',,1);
>Peter:=V.AbrufenDokumentEigenschaft$('Titel');
>V.DateiSchlie?en;

>V.AbrufenDokumentEigenschaft$('Titel') means the german Form of the ??
>GetDocumentAttributes$('Title');  I hope my english translation of this
>Funktion are correct.

>Delphi says he could not use the Character $ for OLE .

>Is there any way to use this OLE Function?

Just don't use the $. In VB the $ is an indication of a string

R.E. den Braasem (aka The Graphical Gnome)
(r...@ktibv.nl)

Senior Software Engineer

Kin

Delphi Developer
Fri, 23 Apr 1999 03:00:00 GMT

Re:OLE Objects in WinWord with $


On 29 Oct 1996 17:49:37 GMT, "Peter A. Smolik" <gl...@via.at> wrote:

Quote
>Sorry,

>I'am looking for an way to resolve this special contruct to read the Title
>and other Information from a Winword OLE Object.

>var V:Variant;
>    Peter:string;
>begin
>V := CreateOleObject('Word.Basic');
>V.Datei?ffnen('j:\ROUTER.DOC',,1);
>Peter:=V.AbrufenDokumentEigenschaft$('Titel');
>V.DateiSchlie?en;

>V.AbrufenDokumentEigenschaft$('Titel') means the german Form of the ??
>GetDocumentAttributes$('Title');  I hope my english translation of this
>Funktion are correct.

>Delphi says he could not use the Character $ for OLE .

>Is there any way to use this OLE Function?

>Thanks and regards

>Peter

search wordapi.zip in Delphi Super Page.

Bye |/      --\  |\/|     |\/|
Bye |\ino   --/  |  |auro |  |ariuzzo (ITALY)

Other Threads

1. Passing an OLE object through another OLE object

2. Printing RTF/Winword 6.0 documents without Winword

3. delphi ole winword bookmarks

4. OLE Auto and winword

5. Upcoming OLE Component for Excel & WinWord

6. OLE and Winword

7. winword ghost instance after ole automation ???

8. Winword OLE

9. OLE WinWord Find / Replace text

10. Check for crashed Winword Object ?