PDA

Ver la Versión Completa : Excel en TOleContainer


Elenita
10-06-2005, 11:56:47
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:
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