Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Servers (https://www.clubdelphi.com/foros/forumdisplay.php?f=9)
-   -   Excel en TOleContainer (https://www.clubdelphi.com/foros/showthread.php?t=22268)

Elenita 10-06-2005 11:56:47

Excel en TOleContainer
 
Hola a todos, tengo una aplicación que muestra un documento excel en un TOleContainer. El usuario no debe poder hacer ninguna modificación, para lo que desactivo el contenedor OleContainer.Enabled := False. Lo que ocurre es que aunque no se puede acceder directamente a las celdas, las barras de herramientas son visibles y están activas. Mi pregunta es ¿cómo hacerlas desaparecer?
He mirado la ayuda de VBA de Excel y he probado cosas cómo:
Código:

OleContainer.OleObject.Application.CommandBars('EuroValue').Enabled := False;
OleContainer.OleObject.Application.CommandBars('EuroValue').Visible := False;
OleContainer.OleObject.Application.CommandBars.Item['EuroValue'].Set_Enabled(False);
 OleContainer.OleObject.Application.CommandBars.Item[1].Set_Enabled(False);

Pero o no funcionan o dan error.
¿Alguien puede ayudarme?
Muchas gracias de antemano.

kanyrosana 24-10-2006 00:08:22

No se si lo has podido solucionar pero quizas estas instrucciones te sirvan

Olecontainer1.OleObject.application.CommandBars['Standard'].Visible:=false;
Olecontainer1.OleObject.application.CommandBars['Formatting'].Visible:=false;
Olecontainer1.OleObject.application.CommandBars['Reviewing'].Visible:=false;


Con esto desaparecen las barras del excel, lo que necesito es que aparezcan estas barras pero con las opciones imprimir y guardar habilitadas


La franja horaria es GMT +2. Ahora son las 22:13:36.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi