FiveTech Support Forums

Hello,

How can I read a setting of Word in my FWH application?

I need to know the startup-folder of Word?

And if someone knows how, also the startup-folder of Excel or Outlook.

Thank you very much for any help.

Dear Michel,

from chatGPT 4: what specific setting are you looking for ?

https://forums.fivetechsupport.com/viewtopic.php?f=6&t=40281&sid=c56426ca68566739547d01904db5c221

Regards, saludos.

hi,

driessen wrote:I need to know the startup-folder of Word?
And if someone knows how, also the startup-folder of Excel or Outlook.

do you mean which "Start" Folder when User want to "open" a Document or Sheet ?

as it is a Microsoft Product it will use Windows default Folder "Personal Files\Document"
... but File-Dialog Control "might" show you "last Folder"

---

under Xbase++ i have use a "Trick" to show "right" Folder

before call ActiveX i call File-Dialog Control "invisible" to set new Path and than close it
to use a "invisible" Control "just" set Position "outside" Screen e.g. {-1000, -1000}

Thanks a lot for any help.

I have the information I needed.

Hello,

I know now how to read settings in Word.

But can anyone help me in changing the settings in Word?

I also need to know how to put the startup setting in Word back to its default value?

Thank you.

Dear Michel,

How are you finally reading the settings ?

Please post the code to see how to save them, thanks

Antonio,

This is the code with the method how I read the startup folder of Word :I want to change the startup folder of Word from my FWH-application.

Thanks.

Dear Michel,

Please try this:

cWord:Options:DefaultFilePath(8) = cNewPath

MsgInfo( cWord:Options:DefaultFilePath(8) )

and check if it works and changes the path or generates an error

Antonio,

While compiling your example, I get the error : Error E0022 Invalid lvalue ':'

So the settings in Word can't be changed that way.

Dear Michel,

Please try it this way:

cWord:Options:DefaultFilePath[8] = cNewPath

Dear Michel,

Please review this:
https://learn.microsoft.com/en-us/office/vba/api/word.options.defaultfilepath
https://documentation.help/VBAWD10/woproDefaultFilePath.htm

It should work as the first try but Harbour syntax does not allows it

Antonio,

I'm sorry, I wasn't able to solve my last problem yet, but I have a new question.

I need to read in my Fwh-application the exact position where my cursor is in a Word-document.

Later on I have to put the cursor back in its original position.

How can I do this?

Thx.

Dear Michel,

To save the current current position:

nStartPosition = oWordApp:Selection:Range:Start

nEndPosition = oWordApp:Selection:Range:End

To later restore the cursor position:

oWordApp:Selection:SetRange( nStartPosition, nEndPosition )

Antonio,

Once again, thank you very much.

It's working fine.