| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Roid
Cmdr
Registrado: 18 Ene 2004Mensajes: 135
|
 Publicado: Mar 18 May, 2004 11:36 pm Asunto: Incrustrar presentacion powerpoint en una aplicaicon |
 |
|
Estoy intentado incrustar en un formulario una presentación en powerpoint, he intentado por activex pero no he encontrado los controles.
Alguien sabe como hacerlo o que controles activex necesito.
Muchas gracias.
Un saludo. |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez
Master
Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
| Publicado: Mie 19 May, 2004 3:59 am Asunto: |
|
|
Prueba utilizar el control TAnime, dentro del foro, existen varios ejemplos
_________________
 |
|
| Volver arriba |
|
|
Roid
Cmdr
Registrado: 18 Ene 2004Mensajes: 135
|
| Publicado: Mie 19 May, 2004 2:31 pm Asunto: |
|
|
Gracias pero no me sirve. He encontrado un ejemplo pero en VB pero el problema es que hay muy poca información del uso de ole con powerpoint y ando un poco perdido.
Si alguien sabe manejar powerpoint mediante ole, porfavor poner algun ejemplo de codigo.
Gracias. |
|
| Volver arriba |
|
|
Roid
Cmdr
Registrado: 18 Ene 2004Mensajes: 135
|
| Publicado: Mie 19 May, 2004 4:44 pm Asunto: Y esto continua |
|
|
Tras tirarme un buen rato he llegado a esto:
String fich="prueba.ppt";
String s = Application->ExeName;
String SHOW_FILE = ExtractFilePath(s)+"\\"+fich;
TVariant Fichero=SHOW_FILE;
MsoTriState EstadoF=msoFalse;
MsoTriState EstadoT=msoTrue;
//Muestro el powerpoint//NOTA= Si no lo abro me da un fallo al abrir el
//fichero.
Power->set_Visible(true);
//Abro el fichero
_Presentation *Pres=Power->Presentations->Open(Fichero,EstadoF,EstadoF,EstadoT);
SlideShowSettings *slideshow=Pres->get_SlideShowSettings();
slideshow->ShowType=ppShowTypeKiosk;
slideshow->Run()->Width=Form1->Width;
slideshow->Run()->Height=Form1->Height;
slideshow->Run();
//Power->set_Visible(false);
//Busco la ventana de presentacion
HWND screenClasshWnd = FindWindow("screenClass",0);
//Aqui es donde me da el fallo, al asignar los manejadores
if(screenClasshWnd)
this->SetParent((TWinControl*)screenClasshWnd);
A ver si alguien me echa una mano(y q no sea al cuello,  )
Thx. |
|
| Volver arriba |
|
|
Roid
Cmdr
Registrado: 18 Ene 2004Mensajes: 135
|
| Publicado: Jue 20 May, 2004 12:12 pm Asunto: |
|
|
El problema esta medio resuelto, lo he hecho usado el WebBrowser este es el codigo:
| Código: |
String fich="prueba.ppt";
String s = Application->ExeName;
String SHOW_FILE = ExtractFilePath(s)+fich;
TVariant var1={SHOW_FILE.c_str()};
Web->Navigate(var1);
|
Pregunta:
Ahora lo que quiero hacer es q cuando te salga la pantalla de abrir|guardar|etc.. no aparezca y abra el fichero q le indico automaticamente.
PD: Se pueden abrir todos los ficheros de office con el Webbrowser.
Un saludo. |
|
| Volver arriba |
|
|
Roid
Cmdr
Registrado: 18 Ene 2004Mensajes: 135
|
| Publicado: Vie 21 May, 2004 9:21 am Asunto: |
|
|
Tema solucionado, en el evento del WebBrowser,WebDownloadBegin, ponemos el siguiente codigo:
| Código: |
void __fastcall TForm1::WebDownloadBegin(TObject *Sender)
{
for (int i=1;i<=4;i++){
keybd_event(VK_TAB, VK_TAB,0,0);
keybd_event(VK_TAB, VK_TAB,KEYEVENTF_KEYUP,0);
}
keybd_event(VK_RETURN, VK_RETURN,0,0);
keybd_event(VK_RETURN, VK_RETURN,KEYEVENTF_KEYUP,0);
}
|
Pregunta: Como abrir un documento con password?, pq con esta tecnica no funciona. Alguna sugerencia?.
Thx. |
|
| Volver arriba |
|
|
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
