Problème utilisation StringToWideChar

Bonjour a tous,
j'ai besoin de passer d'un string à un WideChar. J'ai trouver la fonction et je fai

Code:

---

StringToWideChar('test',test,Length('test')+1);

---

et cela me renvoie une erreur violation d'accès... Je pense que c'est une erreur toute conne mais google ne m'as pas aider... :aie:

Comment as tu déclaré ta variable Test ?

Code:

---

1 2 3 4

var test :PWideChar; begin StringToWideChar('test',test,Length('test')+1);

---

Le probléme vien de la taille que tu donne a Test

sauf erreur de ma part les caractére unicode sont sur 2 Octets

donc forcement tu essaie de faire rentrer 8 Octets+1 (caractére null) dans 5

cela te provoque donc ta violation d'accès ..

Comment lui donner la bonne taille en fonction de String alors??

je dirais tout simplement

Code:

---

2*length(TaChaine) + 1

---

cela devrait fonctionné .

J'ai trouver une meilleur solution, sa peut toujours servir à quelqu'un :

Code:

---

PWideChar(WideString(Edit1.Text))

---