Discussion :

[PPFIS68240]

Bonjour.
Je voudrais passer le nom d'un onglet d'un tabControl dans un élément XML:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Folio.FolioActif:= TabControl1.Tabs.Text; // (FolioActif de type String)
.....
ele:= doc.CreateElement(FolioActif);
 racine.AppendChild(ele);

Mais ça ne marche pas pour un problème de compatibilité de type. Il me faut un type DOMstring. Je ne trouve pas comment faire la transcription.

Merci de votre aide

[tourlourou]

DOMstring semble être une chaîne Unicode 16bits ; essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Folio.FolioActif := UTF8ToUTF16(TabControl1.Tabs.Text);

[PPFIS68240]

J'ai essayé, même résultat
avec comme message: le projet a levé une classe d'exeption 'EDOMEError'....

[tourlourou]

si tu utilises l'unité dom.pas de Lazarus, la déclaration y est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DOMString = WideString;

et donc, essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Folio.FolioActif := UTF8Decode(TabControl1.Tabs.Text);

[PPFIS68240]

J'ai essayé, le pb est toujours le même.
Quand j'utilise une simple variable de type String avec une valeur quelconque, ça marche. Le pb est dès que j'utilise TabControl1.Tabs.Text qui lui est du type TString.

[tourlourou]

Essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Folio.FolioActif := UTF8Decode(UTF8Encode(TabControl1.Tabs.Text)); // en déclarant FolioActif de type WideString ou DOMString

Si TabControl1.Tabs.Text est de type AnsiString, il sera passé en UTF8 puis Unicode

Sinon, que donne le passage par une variable intermédiaire ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
S:=TabControl1.Tabs.Text; // même si le TStrings.Text est déjà de type string
Folio.FolioActif:=S;