[Résolu][Writer] Extension : analyse ouverture de fichiers

[chbok]

Bonjour,
Je cherche à savoir s'il est possible pour une extension de surveiller les ouvertures de fichiers d'un utilisateur, afin de "réagir" (boite de dialogue par exemple) lorsque des mots clés y sont présents ?

Une extension permet d'ajouter un menu contextuel ou de modifier les préférences. Je ne souhaite pas modifier de force "l'action assignée" de l'évènement "Chargement du document terminé".

Est-ce possible ?

[Dude]

Salut,

une extension de surveiller les ouvertures de fichiers d'un utilisateur,

Le processus d'E/S est assuré par le système d'exploitation.
Donc, je ne vois pas trop ce que Writer vient faire là-dedans.

[chbok]

Salut,
Je ne parlais pas d'une surveillance de tous les fichiers de l'OS, uniquement de pouvoir exécuter une action macro après que l'utilisateur ait ouvert un document ODT (Writer) et que celui-ci contiennent certains mots. Ma question porte bien sur une extension de Writer pouvant (ou non) répondre à ce besoin.

Peut être ai-je mal formulé ma question ?

[Piaf]

Bonjour
Sans extension, une simple macro dans Mes macros > Standard affectée à l'évènement Ouvrir le document de Libre Office devrait faire l'affaire.

Code : Tout sélectionner

	oDoc = thisComponent
	If Right(odoc.Title,3) = "odt" Then
		Dim Recherche As Object, motCle as String, trouv As Variant
		Recherche = oDoc.createSearchDescriptor
		motCle = "Test"
		With Recherche
			.SearchString = motCle
			.SearchWords = true
		End With
		trouv = oDoc.findAll(Recherche)
		If trouv.Count > 0 Then MsgBox "Bonjour"
	End if

A tester.
A+

[chbok]

Merci Piaf,
Je n'ai pas de difficulté pour le script de recherche.
Comme je l'indiquais, ma question porte vraiment sur une extension qui doit pouvoir surveiller chaque ouverture de fichiers, sans modifier manuellement les paramètres des évènements de libreoffice.
Si j'arrive à passer cette étape, je pourrai finir mon projet qui concerne plusieurs personnes (d'où une extension). En fait, je ne sais pas si c'est possible ou non !

[Hubert Lambert]

Bonjour,

Pour réagir à un événement global, il faut :
- définir et enregistrer un service qui implémente la fonction "execute" de l'interface com.sun.star.task.XJob ou la fonction "executeAsync" de l'interface com.sun.star.task.XAsyncJob;
- définir un fichier de configuration "job.xcu" qui fera le lien entre ce service et le ou les événements auxquels on souhaite réagir.
Un bon exemple d'extension de ce type est ImpressRunner.

Dans ton cas, le fichier d'implémentation (en python) pourrait ressembler à ceci :

Code : Tout sélectionner

import unohelper

from com.sun.star.task import XJob
from com.sun.star.awt.MessageBoxType import MESSAGEBOX, INFOBOX, ERRORBOX, WARNINGBOX, QUERYBOX

implementation_name = "org.chbok.TestOnLoad"

class TestOnLoad(unohelper.Base, XJob):
    def __init__ (self, ctx):
        self.ctx = ctx
    def createUnoService(self, service):
        return self.ctx.ServiceManager.createInstanceWithContext(service, self.ctx)
    def msgbox(self, message, titre="Message", boxtype='message', boutons=1):
        types = {'message': MESSAGEBOX, 'info': INFOBOX, 'error': ERRORBOX,
                 'warning': WARNINGBOX, 'query': QUERYBOX}
        tk = self.createUnoService("com.sun.star.awt.Toolkit")
        win = self.createUnoService("com.sun.star.frame.Desktop").getCurrentFrame().ContainerWindow
        box = tk.createMessageBox(win, types[boxtype], boutons, titre, message)
        return box.execute()
    def execute(self, args):
        desktop = self.createUnoService("com.sun.star.frame.Desktop")
        doc = desktop.CurrentComponent
        url = unohelper.fileUrlToSystemPath(doc.URL)
        if doc:
            self.msgbox("Vous accédez au document\n< {} >".format(url))

g_ImplementationHelper = unohelper.ImplementationHelper()
g_ImplementationHelper.addImplementation (TestOnLoad,
                    implementation_name,
                    (implementation_name,))

et le job.xcu à ceci :

Code : Tout sélectionner

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE oor:component-data SYSTEM "../../../../component-update.dtd">
<oor:component-data oor:name="Jobs" oor:package="org.openoffice.Office" xmlns:oor="http://openoffice.org/2001/registry" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> 
  <node oor:name="Jobs">
    <node oor:name="org.chbok.TestOnLoad.Job" oor:op="fuse">
      <prop oor:name="Service">
        <value>org.chbok.TestOnLoad</value>
      </prop>
    </node>
  </node>
  <node oor:name="Events">
    <node oor:name="OnLoad" oor:op="fuse">
      <node oor:name="JobList">
        <node oor:name="org.chbok.TestOnLoad.Job" oor:op="fuse"/>
      </node>
    </node>
  </node>
</oor:component-data>

Je joins un oxt test pour illustrer la chose.
Cordialement.

[Dude]

Dans ton cas, le fichier d'implémentation (en python) pourrait ressembler à ceci

A priori, la question est posée pour du Basic.
Ce langage ne supporte pas l'implémentation de service.

[Hubert Lambert]

L'auteur du fil sera peut-être heureux de savoir qu'une solution existe, même en dehors du basic...

[chbok]

L'auteur du fil sera peut-être heureux de savoir qu'une solution existe, même en dehors du basic...

Bonjour,

Oui, tout a fait heureux. Je ne savais si c'était possible ou non, maintenant je vais pouvoir creuser le sujet, et bien sur l'adapter en Basic (Edit : arg, je viens de lire cette phrase moins optimiste pour moi : Ce langage ne supporte pas l'implémentation de service.).
Merci de m'avoir aiguiller.
(Je vais clore le sujet même si je n'ai pas une solution en Basic)