VisioApplication.Visible don't seem to be working

[FR]

I'm using Visio type library and having problem connecting to visio and
openning a document without visio's splash screen or the progress bar
showing. The following is delphi code but it is fairly easy to read even if
you are not familiar with delphi:

FVisioApp.Visible := False;
FVisioApp.ScreenUpdating := 1;
FVisioApp.ShowProgress := 1;
FVisioApp.ShowChanges := FALSE;
FVisioApp.Connect;
FVisioApp.Documents.Open(FileName);

This doesn't seems to work. If visio hasn't been started yet, the splash
screen flashes very fast and then the progress dialog flashes by very
quickly. Are there any ways to surpress those screens?

TIA,

FR

 

[Chris Roth]

The only way I know of to suppress the splash screen is by using the
/nosplash command line switch when starting the Visio .exe. This means
you're starting Visio with some sort of shell command, which might not be
ideal. I have a nagging hunch that there's some other way to get rid of the
splash, but I can't remember or find what it is.

Check out the app.ShowProgress method for getting rid of the progress bar.
Also, app.AlertResponse might be worth a look.

--
Hope this helps,

Chris Roth
Visio MVP
(e-mail address removed)

 

[Bill K. [MSFT]]

This will launch Visio without UI or splash screen (sorry, I don't know the
Delphi syntax):
VB:
FVisioApp = CreateObject("Visio.InvisibleApp")
C/Cpp:
// guids are in visio_i.c
hr = CoCreateInstance(CLSID_InvisibleApp, NULL, CLSCTX_ALL,
IID_IVInvisibleApp, &FVisioApp);


Hope this helps,