5 messages in org.openoffice.fr.progRe: [prog] Où mémoriser la config d'u...
FromSent OnAttachments
JovialDec 29, 2007 4:54 am 
Bernard MarcellyDec 29, 2007 9:19 am 
JovialJan 2, 2008 12:44 pm 
Bernard MarcellyJan 3, 2008 4:30 am 
JovialJan 3, 2008 6:08 am 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: [prog] Où mémoriser la config d'un odtActions...
From:Bernard Marcelly (marc@club-internet.fr)
Date:Jan 3, 2008 4:30:41 am
List:org.openoffice.fr.prog

Message de Jovial date 2008-01-02 21:44 :

Bonjour

Bernard Marcelly a écrit :

Message de Jovial date 2007-12-29 13:55 :

Bonjour

J'ai un document ou j'aurai besoin sauvegarder les infos boite de dialogue sans passer par un fichier externe.

Eh bien mets un contrôle ! (ou plusieurs) Dépose un contrôle Etiquette, en effaçant son champ Titre. Cela donne un contrôle totalement invisible.

Ben oui c'est une bonne idée pour mon cas cela suffira.

Par contre si j'ai 50 chaines à stocker cela devient pas pratique, la question qui me vient c'est: puisque mon l'odt est une archive peut créer lire et écrire un fichier texte (ou xml) par macro à l'intérieur même de mon fichier ?

Je préfère les solutions simples. Une chaîne a en général moins de 100 caractères, alors qu'elle peut en contenir plus de 65000. Dans cet exemple je mémorise 101 chaînes dans une seule chaîne appelée memoire.

Dim monBesoin(100) As String, memoire As String Dim x As Long ' remplissage for x = 0 to UBound(monBesoin) monBesoin(x) = "taratata" & x next memoire = join(monBesoin(), chr(1000)) ' effacer tout redim monBesoin(100) As String print monBesoin(75) ' vérif : chaîne vide ' --- récupérer les chaînes monBesoin = split(memoire, chr(1000)) print monBesoin(75), monBesoin(0) ' on a récupéré les valeurs

J'ai supposé que les chaînes n'utilisent pas le caractère de valeur Unicode 1000.

Bernard