Discussion :

[rbag]

Salut,

je réalise le code suivant :

Code :

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

PChar(CNode.Text)

avec CNode un TTreeNode et Text de type widestring... Tout ça me sert dans une requête sql le seul souci est que l'erreur SQL est :

La table essai.c n'existe pas alors que 'c' devrait être 'clients'...

Merci d'avance

[rbag]

Alors là, je suis perplexe...

J'ai fait :

Code :

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

1
2
3
4
5
6
7
 
var
  Req : String;
...
...
 Req  := CNode.Text;
 mysql_query(Conn,PChar(Req));

Et ça marche...Si qqun à une idée de l'origine du problème..

[Pierre Castelain]

Je crois que je sais...

Le type WideChar est en fait PWideChar, c'est à dire un pointeur sur un vecteur de WideChars (2 octets). Lorsque tu écris:

Code :

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

1
2
3
4
5
6
var 
  Req : String; 
... 
... 
Req  := CNode.Text; 
mysql_query(Conn,PChar(Req));

Delphi te fait le transtypage entre un PWideChar et un String (création d'une chaine et recopie du contenu), suivi du transtypage entre un String et un PChar (même combat, création du PChar et recopie du contenu).
Par contre, si tu écris:

Code :

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

PChar(CNode.Text)

Delphi doit considérer qu'il s'agit de 2 types pointeurs et ne faire aucune vérification ni opération de recopie. Dans ton cas, le premier caractère Unicode (WideChar) doit être #99#00. Comme le zéro est synonyme de fin de chaine dans un PChar tu te retrouve avec la chaine 'c'.
CQFD.

PS: je n'ai pas vérifié ce que je viens d'exposer. N'hésitez pas à démentir...