Faq C++Builder

Sommaire > MS Office > PowerPoint
11.5.1. Gestion de l'application (11)

        Comment ouvrir PowerPoint avec Ole ?
        Comment fermer PowerPoint avec Ole ?
        Comment ouvrir un fichier OlePowerPoint ?
        Comment sauver un document OlePowerPoint ?
        Comment ajouter une nouvelle diapositive vierge ?
        Comment récupérer le nom du diaporama en cours OlePowerPoint ?
        Comment sélectionner une diapositive OlePowerPoint ?
        Comment compter le nombre de pages d'une présentation OlePowerPoint ?
        Comment exécuter une présentation OlePowerPoint ?
        Comment revenir è la page précédente OlePowerPoint ?
        Comment fermer une fenêtre de visualisation sans quitter OlePowerPoint ?

Version PDF Version hors-ligne

Comment ouvrir PowerPoint avec Ole ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet d'ouvrir PowerPoint


    // ne pas oublier d'inclure " #include <utilcls.h> "

    Variant vMSPowerPoint,NameSpace;
    
        try
    {
    // on récupére l'instance active.
    vMSPowerPoint = Variant::GetActiveObject("PowerPoint.Application");
    }
        catch(...)
    {
    // sinon on crée une nouvelle instance
    vMSPowerPoint = Variant::CreateObject("PowerPoint.Application");
    }
    // on rend Visible l'instance d'Excel que nous avons défini
    vMSPowerPoint.OlePropertySet("Visible", true);

Comment fermer PowerPoint avec Ole ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de fermer PowerPoint


vMSPowerPoint.OleFunction("Quit");
vMSPowerPoint = Unassigned;

Comment ouvrir un fichier OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet d'ouvrir le fichier d'une présentation PowerPoint.


    Variant vMSPowerPoint;
 
    vMSPowerPoint.OlePropertyGet("Presentations").OleFunction("Open", "C:\\Documents and Settings\\blondelle\\Mes documents\\astro\\Presentation_master05.ppt", false);

Comment sauver un document OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de sauvegarder la présentation


vMSPowerPoint.OlePropertyGet("ActivePresentation").OleFunction("Save");

Comment ajouter une nouvelle diapositive vierge ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet d'ajouter une nouvelle diapositive vierge


    vMSPowerPoint.OlePropertyGet("Presentations").OleFunction("Add", true);

Comment récupérer le nom du diaporama en cours OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de récupérer le nom de la diapositive en cours


    String vNom_du_Diaporama = vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("Name");

Comment sélectionner une diapositive OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de sélectionner une diapositive à partir de son numéro


    // ("Range", 3) la valeur 3, represente le numero de la diapositive que l'on va selectionner
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("Slides").OleFunction("Range", 3).OleFunction("Select");

Comment compter le nombre de pages d'une présentation OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de compter le nombre de pages de la présentation


    int nb_pages = vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("Slides").OlePropertyGet("Count");

Comment exécuter une présentation OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de réaliser la visualisation du diaporama


    // parametrage de la visualisation
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertySet("ShowType", 1);
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertySet("LoopUntilStopped", 0);
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertySet("ShowWithNarration", -1);
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertySet("ShowWithAnimation", -1);
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertySet("RangeType", 1);
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertySet("AdvanceMode", 2);
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OlePropertyGet("PointerColor").OlePropertySet("RGB", (255, 0, 0));

    // lancement de la visualisation du diaporama
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowSettings").OleFunction("Run");
 
    // boucle pour changer de page si la presentation n'est pas programmee en automatique
    for (int i = 0; i <= NB_de pages; i++)
        {
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowWindow").OlePropertyGet("View").OleFunction("Next");
   // ici inserer une temporisation suffisante pour avoir le temps de visualiser les pages
        }

Comment revenir è la page précédente OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de revenir sur la page précédente


    // fonction pour revenir a la page precedente
    vMSPowerPoint.OlePropertyGet("ActivePresentation").OlePropertyGet("SlideShowWindow").OlePropertyGet("View").OleFunction("Previous");

Comment fermer une fenêtre de visualisation sans quitter OlePowerPoint ?

Créé le 10/12/2007[haut]

auteur : blondelle

Cette procédure permet de fermer la fenêtre de visualisation sans fermer PowerPoint


    vMSPowerPoint.OlePropertyGet("ActiveWindow").OleFunction("Close");

Version PDF Version hors-ligne

Consultez les autres F.A.Q.

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2009 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.