[Résolu][Writer] créer un signet au niveau du curseur

[le vent de l'est]

Bonjour,

J'aimerais créer un signet "place1" à l'endroit où se trouve le curseur dans ma macro :

En fait pour être plus précis, ce que je veux faire et que j ai fait c'est :
- lorsque je clique sur un bouton radio : du texte apparait à l'endroit du signet "place1"
- lorsque ce bouton est décliqué, le texte disparait (caractère par caractère ce qui n'est pas super, si vous avez un méthode meilleur que de mettre 150 dispatcher.executeDispatch(document, ".uno:Delete", "", 0, Array()) d'affilé; se serait cool.
jusque là ça va....grâce à ce forum !
MAIS lorsque je reclique sur le bouton, plus rien ne marche, en fait mon signet a disparus. Donc je me suis "créés en un nouveau"

Pourriez-vous m'aider ?

[MrPropre]

Bonjour,

Titre modifié : Le balisage doit bien sûr être correctement orthographié (première lettre en majuscule puis le reste en minuscules).
Macro est inutile dans la section consacrée aux macros.

Openoffice 3.3 sous windows XP

Veuillez noter que la version utilisée est obsolète et n'est plus maintenue.
Commencez par vous mettre à jour : https://forum.openoffice.org/fr/forum/v ... =2&t=49867
Puis corrigez l'information dans votre signature.

Si le problème persiste, joignez le document permettant de reproduire ce que vous décrivez :
Comment joindre un fichier au format ODF
Pensez également à dépersonnaliser le fichier joint.

***

[le vent de l'est]

Bonjour,

Voici mon fichier.
Il y a deux macros : une qui créer du texte et l'autre qui l'efface.

les deux sont sur le bouton B.

Merci

[Piaf]

Bonjour

Il y a deux macros : une qui créer du texte et l'autre qui l'efface.
les deux sont sur le bouton B.

Elles sont affectées au bouton B, mais ne sont pas dans le document.

Macro.png

De plus je ne suis pas certain que les événements réception et perte du focus soient les meilleurs pour réaliser ce que tu veux faire.
A+

[jf.l]

Bonjour Vent de l'est.
Si vous utilisez les signets "Pense bête" il n'y en a que trois dans un document. Chaque nouveau signet effacera le plus ancien.
Un style de paragraphe ou les annotations pourraient être plus faciles à gérer. On peut en mettre plein, plein, plein... des tonnes.
Cordialement,
JF.L

[Hubert Lambert]

Bonjour,

Ci-joint une exemple. L'astuce consiste à créer un signet sur une portion de texte (immédiatement écrasée) plutôt que sur la position d'un curseur : dans le premier cas, le signet sera persistant quel qu'en soit le contenu; dans le second cas, le signet sera effacé dès que le contenu est une chaîne vide.
La macro affectée à l'événement "statut modifié" de chaque bouton :

Code : Tout sélectionner

sub btn_radio(event)
    doc = thiscomponent
    bouton = event.Source.Model
    reperes = doc.Bookmarks
    repere = bouton.GroupName
    if not reperes.hasByName(repere) then
        insere_signet(doc, repere)
    end if
    signet = reperes.getByName(repere)
    signet.Anchor.setString(bouton.Tag)
end sub

La macro pour l'insertion du signet :

Code : Tout sélectionner

sub insere_signet(doc, nom)
    bookmark = doc.createInstance("com.sun.star.text.Bookmark")
    bookmark.Name = nom
    vc = doc.CurrentController.ViewCursor
    vc.setString(nom)
    doc.Text.insertTextContent(vc, bookmark, True)
end sub

Le fichier joint ne contient aucun signet. Le nom du signet est attribué en fonction du nom de groupe des boutons radio.
Reste me semble-t-il à gérer le point d'insertion du signet, la position du curseur visible étant très aléatoire...
Cordialement.