souci de transtypage

Version imprimable

12/09/2007, 18h08
simoryl

souci de transtypage

Salut,

J'ai quasiment fini ce que je voulais faire, oufff mais je bloque sur un dernier truc : je voudrais transtyper :
un char* en un PRInt32
un char* en un nsAString

mais je trouve pas comment faire ça simplement.

Simo'

PS: promis après j'arrête d'embêter le monde avec mes questions à la c...
12/09/2007, 19h15
poukill

Qu'est ce que c'est que c'est format là? 8O
Ils sont définis ou ? :koi:
12/09/2007, 21h31
yan

Citation:

Envoyé par simoryl

Salut,

J'ai quasiment fini ce que je voulais faire, oufff mais je bloque sur un dernier truc : je voudrais transtyper :
un char* en un PRInt32
un char* en un nsAString

mais je trouve pas comment faire ça simplement.

Simo'

PS: promis après j'arrête d'embêter le monde avec mes questions à la c...

normalement faut utiliser un reinterpret_cast
13/09/2007, 00h03
simoryl

c'est dans le cadre d'une extension firefox, ma dll doit utiliser ces types...
Que veux-tu dire par reinterpret_cast Mongaulois???
13/09/2007, 09h09
Médinoc

reinterpret_cast : L'opérateur de cast du C++.
Ça permet entre autres de caster des entiers en pointeurs et inversement, mais ça ne permet pas les conversions d'objet.

Si nsAString est une classe, elle doit avoir un constructeur permettant la conversion depuis char*, car un simple reinterpret_cast n'aidera pas.
13/09/2007, 10h01
yan
Citation:

Envoyé par Médinoc

reinterpret_cast : L'opérateur de cast du C++.
Ça permet entre autres de caster des entiers en pointeurs et inversement, mais ça ne permet pas les conversions d'objet.

Si nsAString est une classe, elle doit avoir un constructeur permettant la conversion depuis char*, car un simple reinterpret_cast n'aidera pas.

dans ce cas la oui.
reinterpret_cast = cast qui reinterpreter une variable en sous une autre forme (sans conversion sans rien).
par exemple

EDIT CODE FAUX dsl
Code:

1 2 int a =1221321213; float b = reinterpret_cast<float>(a);
le reinterpret_cast va rinterpreter la memoire utilisé par a comme un float.
Ici je n'ai aucune idé de ce que va valoir b :aie:
c'est comme si tu faisait

Code:

b =* ((float*) &a);
13/09/2007, 10h13
Laurent Gomila

reinterpret_cast ne peut être fait que sur des pointeurs, ton premier exemple ne compilera pas.
13/09/2007, 10h17
yan

Citation:

Envoyé par Laurent Gomila

reinterpret_cast ne peut être fait que sur des pointeurs, ton premier exemple ne compilera pas.

? ok désolé alors. J'ai pas compris son interêt du coup...

Code:

1 2 int a =1221321213; float b = *reinterpret_cast<float *>(&a);
est correct alors, non?

13/09/2007, 10h28
Laurent Gomila

reinterpret_cast sert à interpreter autrement la valeur d'un emplacement mémoire. En gros, tu dis au compilo "la variable d'adresse x a pour type int, mais je veux que tu considères que c'est un float". Tu ne modifies jamais aucune valeur avec reinterpret_cast, seulement la manière dont tu vas pointer dessus.

Ca n'aurait aucun sens de dire "considère la valeur x, qui est un int, comme un float". Ou plutôt si : c'est une conversion classique, un static_cast.
13/09/2007, 10h28
Laurent Gomila
Citation:
Envoyé par Mongaulois

Code:

1 2 int a =1221321213; float b = *reinterpret_cast<float *>(&a);

est correct alors, non?
Oui.
13/09/2007, 10h29
koala01
Salut,

Selon la doc mozilla une nsAString est une "class represents a character string composed of double-byte storage units" (classe représentant une chaîne de caractères composées d'unité de stokage à deux bytes), autrement dit, quelque chose fort proche de std::w_string.

PRInt32 quant à lui, garanti l'utlisation de 32 bits pour les types entiers.

L'"idéal" serait donc d'utiliser les spécialisations unicodes pour toutes les gestions de flux et de chaine(wchar_t, std::wstring, wcout, wcin...).

Il est à noter que la AnsiString ou équivalent, fournie par certains environnements (Borland, principalement) est parfaitement utilisable pour ce genre de chose et devrait permettre de faciliter le travail ;)

Si tu utilise les chaînes et gestions de flux "classiques" (char, std::string, cin, cout...) il faudra la plupart du temps:
- récupérer un const char* (avec la méthode c_str(), par exemple)
- le convertir en const wchar_t* (une fonction a été donnée il y a quelque mois, un recherche sur le forum devrait te permettre de la retrouver ;))
- utiliser le const wchar_t* pour créer ta nsAString (ou)
- utiliser un wstringstream pour permettre la conversion du const wchar_t* en PRInt32 (qui peut très bien n'être qu'un int, selon le système ;))
13/09/2007, 10h30
yan

Citation:

Envoyé par Laurent Gomila

reinterpret_cast sert à interpreter autrement la valeur d'un emplacement mémoire. En gros, tu dis au compilo "la variable d'adresse x a pour type int, mais je veux que tu considères que c'est un float". Tu ne modifies jamais aucune valeur avec reinterpret_cast, seulement la manière dont tu vas pointer dessus.

Ca n'aurait aucun sens de dire "considère la valeur x, qui est un int, comme un float". Ou plutôt si : c'est une conversion classique, un static_cast.

Donc j'avais bien compris:yaisse2:
mais je ne savait pas qu'il ne marchais qu'avec les pointeurs
13/09/2007, 12h37
simoryl
Citation:
Envoyé par koala01

Si tu utilise les chaînes et gestions de flux "classiques" (char, std::string, cin, cout...) il faudra la plupart du temps:

récupérer un const char* (avec la méthode c_str(), par exemple)
le convertir en const wchar_t* (une fonction a été donnée il y a quelque mois, un recherche sur le forum devrait te permettre de la retrouver ;))
utiliser le const wchar_t* pour créer ta nsAString (ou)
utiliser un wstringstream pour permettre la conversion du const wchar_t* en PRInt32 (qui peut très bien n'être qu'un int, selon le système ;))
J'ai essayé plusieurs façon mais j'arrive à rien. Je suis total largué sur ce coup là... Je pensais pas que c'était si dur de convertir mes petites choses. Moi qui croyait que ça serait pas long à faire.
Pour le moment ça ne me donne plus envie de continuer le vc++ par la suite... lol
13/09/2007, 12h59
koala01

Ce n'est pas tant un problème de complexité du langage (bien que C et C++ comptent effectivement parmis les plus complexes car parmis les "plus bas niveau") qu'un problème d'évolution de la technique...

A l'époque, les seules tables de caractères étaient de l'ordre de la table ASCII, voire ASCII étendu, ou autres tables classiquement codées sur 7 ou 8 bits (127 ou 255 caractères utiles).

Avec la démocratisation des ordinateurs (et principalement des PC's), il a fallu adopter des polices de caractères permettant de reproduire plus de symboles, pour permettre aux arabes, aux indoux ou au papous d'obtenir un texte dans leur langue maternelle.

Cela a mené à la création des tables de caractères iso-8859, utf et autres, dans lesquelles un caractère n'est plus représenté sur 7 ou 8 bits, mais sur 16.

Le C et le C++ ont décidé de garder la compatibilité avec les caractères codées sur 7 ou 8 bits tout en permettant de travailler avec les tables de caractères dites "unicode".

D'autres langages peuvent avoir décidé de ne travailler qu'avec des tables de caractères unicode, mais, cela se fait aux dépends de la compatibilité avec certaines architectures et/ou systèmes plus anciens ;)

Comme l'internet en général s'est fortement internationalisé, il est logique que les navigateurs fassent le choix de permettre l'utilisation de tables de caractères unicode, pour ne pas pénaliser le russe, le français (avec ses accents et ses cédilles) ou le papou, dont tous les caractères ne sont pas représentés dans la table ASCII (ou similaire) originale...

Evidemment, cela sous-entend que le programmeur doit s'adapter pour permettre le support "multi langue" :P

Maintenant, ainsi que je l'ai indiqué, il existe plusieurs solutions, dont la plus simple est sans doute d'utiliser directement... le type de chaîne et les autres gestionnaires de flux adapté à l'unicode: les std::wstring et consors ;)

d'ou viens ton pointeur sur char * ???

c'est une fonction qui te retourne ce char * et tu sait si c'est un PRInt32 ou un nsAString?

es que cela ressemble à :
Code:

1 2 3 4 5 6 7 8 9 10 char *p; p = GetParam("une string"); nsAString * maString = reinterpret_cast<maString *>(&p); p = GetParam("un int"); PRInt32 * monInt = reinterpret_cast<PRInt32 *>(&p);

13/09/2007, 14h26
koala01
Citation:
Envoyé par Mongaulois

d'ou viens ton pointeur sur char * ???

c'est une fonction qui te retourne ce char * et tu sait si c'est un PRInt32 ou un nsAString?

es que cela ressemble à :

Code:

1 2 3 4 5 6 7 8 9 10 char *p; p = GetParam("une string"); nsAString * maString = reinterpret_cast<maString *>(&p); p = GetParam("un int"); PRInt32 * monInt = reinterpret_cast<PRInt32 *>(&p);
Carefull man...

Le code reinterpret_cast que tu fournis va tenter d'obtenir un ... pointeur de pointeur :P
13/09/2007, 14h40
yan
Citation:

Envoyé par koala01

Carefull man...

Le code reinterpret_cast que tu fournis va tenter d'obtenir un ... pointeur de pointeur :P

euh oui je trouve que c'etait chelou aussi :aie:
enfin il va plustôt cast un pointeur de pointeur vers un pointeur, ce qui ne veut pas dire grand chose
Code:

1 2 3 4 5 6 7 8 char *p; p = GetParam("une string"); nsAString * maString = reinterpret_cast<maString *>(p); p = GetParam("un int"); PRInt32 * monInt = reinterpret_cast<PRInt32 *>(p);
mais le principe est là
13/09/2007, 15h52
simoryl

J'ai faillit hurler de joie en lisant vos lignes.
C'est peut-être normal ou pas, je m'y connais pas assez je l'avoux et je suis pas un habituer des pointeurs mais quand je fais :

Code:

PRInt32 * monInt = reinterpret_cast<PRInt32 *>(p);

ça me renvoit un chiffre qui n'est pas égal à celui qu'il devrait mais au moins ça plante pas :-)

euh, pour expliquer un peu le contexte, je fais une extension Firefox avec un XPcom sous forme d'une dll en vc++. Du coup ma fonction doit renvoyer des PRInt32 ou des nsString pour que Firefox accepte mes données.
Là où ça se complique, c'est que mon xpcom appelle une autre dll fait en delphi et qui est utilisé par un autre de mes programmes.
Mes fonctions de ma dll Delphi renvoit leur résultat sous forme de Pchar que je récupère dans un char* côté vc++. Et donc, j'ai besoin dans certains cas de transformer ces char* en PRInt32 et dans d'autre cas en nsString.

C'est un peu foufou mon truc mais si j'arrive à faire marcher mon proto' je pourrais faire mes extensions voulues en espérant que ça plaise mais ça c'est une autre histoire...
13/09/2007, 16h09
yan
Code:

1 2 PRInt32 * monInt = reinterpret_cast<PRInt32 *>(p);
donne un pointeur sur un PRInt32 et non un PRInt32 .
13/09/2007, 17h29
simoryl

ok ok, mais comment je fais pour avoir la valeur qui est pointée et non pas son adresse mémoire?
Frappez pas trop fort :aie: je commence à tout mélanger...
Quand j'aurai compris le truc et que mon proto sera ok je pense que ça ira déjà mieux (j'espère...)

Ben, comme pour tout pointeur, quand tu veux accéder à la valeur et non à l'adresse à laquelle elle se trouve
Code:

1 2 3 4 5 6 7 8 9 10 11 12 /* transformer un entier en un pointeur sur entier */ int entier; int *ptrent; ptrent=&entier; /* récupérer un entier au départ d'un pointeur sur entier int recup; recup=*ptrent; /* particularité pour les tableaux */ int tab[10]; ptrent=tab; recup=tab[3];
[EDIT]Ceci dit, ce genre de question nous inciterait presque à te conseiller de réviser ou de relire très sérieusement ton cours ou ton livre à la partie "pointeurs et tableaux" ;):D

13/09/2007, 18h12
simoryl

aaaaahhhhhhh
Ce que j'avais fait été donc bon... Mes souvenirs sont pas encore trop pourri...
Arf Pas de bol, maintenant, j'ai Firefox qui explose encore quand j'arrive au niveau de mon transtypage... De quoi se pendre...
Je vais aller bouffer, ça ira pitète mieux après....

:cry: J'ai trop l'impression de toucher le fond là, y a pas plus pire que moi...
J'ai fait ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
NS_IMETHODIMP CSpecialThing::Add(PRInt32 a, PRInt32 b, PRInt32 *_retval)
{
	PRInt32 test;
	typedef char* (_stdcall *ProcDllPtr)(char* monString);
	char* reponseDLL;
	HMODULE hinstDLL=LoadLibraryA((LPCSTR)"C:\\DLMDLL.dll");
	if (hinstDLL) {
		ProcDllPtr ProcExportDll = (ProcDllPtr) GetProcAddress(hinstDLL, "Ajouter_article");
		reponseDLL=ProcExportDll((char*)("affiche moi"));
	} else {
		//traitement erreur
	}
	FreeLibrary((HINSTANCE)hinstDLL);
 
	PRInt32  * testa = reinterpret_cast<PRInt32 *>(reponseDLL);
	test=*testa;
 
	*_retval = test;
	return NS_OK;
}

ça compile nickel mais mon Firefox plante juste au niveau du transtypage... Je sent que j'ai encore du faire une connerie...

Citation:
Envoyé par simoryl
:cry: J'ai trop l'impression de toucher le fond là, y a pas plus pire que moi...
J'ai fait ça :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 NS_IMETHODIMP CSpecialThing::Add(PRInt32 a, PRInt32 b, PRInt32 *_retval) { PRInt32 test; typedef char* (_stdcall *ProcDllPtr)(char* monString); char* reponseDLL; HMODULE hinstDLL=LoadLibraryA((LPCSTR)"C:\\DLMDLL.dll"); if (hinstDLL) { ProcDllPtr ProcExportDll = (ProcDllPtr) GetProcAddress(hinstDLL, "Ajouter_article"); reponseDLL=ProcExportDll((char*)("affiche moi")); } else { //traitement erreur } FreeLibrary((HINSTANCE)hinstDLL); PRInt32 * testa = reinterpret_cast<PRInt32 *>(reponseDLL); test=*testa; *_retval = test; return NS_OK; }
ça compile nickel mais mon Firefox plante juste au niveau du transtypage... Je sent que j'ai encore du faire une connerie...
je pense que tu libère ta dll trop tôt. il y as de forte chance que lorsque tu la libère, la memoire pointer par reponseDLL soit libéré, d'ou ton crash.
essaie cela
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 NS_IMETHODIMP CSpecialThing::Add(PRInt32 a, PRInt32 b, PRInt32 *_retval) { PRInt32 test; typedef char* (_stdcall *ProcDllPtr)(char* monString); char* reponseDLL; HMODULE hinstDLL=LoadLibraryA((LPCSTR)"C:\\DLMDLL.dll"); if (hinstDLL) { ProcDllPtr ProcExportDll = (ProcDllPtr) GetProcAddress(hinstDLL, "Ajouter_article"); reponseDLL=ProcExportDll((char*)("affiche moi")); } else { //traitement erreur } PRInt32 * testa = reinterpret_cast<PRInt32 *>(reponseDLL); test=*testa; *_retval = test; FreeLibrary((HINSTANCE)hinstDLL); return NS_OK; }
Le mieux serait un class qui interface ta dll

Déjà, on pourrait commencer par te suggérer d'adopter une politique d'indentation rigoureuse... N'oublie jamais qu'un code est beaucoup plus souvent lu qu'il n'est écrit, et que, s'il te semble limpide aujourd'hui, il peut te sembler bien plus nébuleux dans une semaine ou dans trois mois :P

Ainsi, et sans avoir apporté la moindre correction, ton code serait bien plus lisible sous un forme proche de
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 NS_IMETHODIMP CSpecialThing::Add(PRInt32 a, PRInt32 b, PRInt32 *_retval) { PRInt32 test; typedef char* (_stdcall *ProcDllPtr)(char* monString); char* reponseDLL; HMODULE hinstDLL=LoadLibraryA((LPCSTR)"C:\\DLMDLL.dll"); if (hinstDLL) { ProcDllPtr ProcExportDll = (ProcDllPtr) GetProcAddress(hinstDLL, "Ajouter_article"); reponseDLL=ProcExportDll((char*)("affiche moi")); } else { //traitement erreur } FreeLibrary((HINSTANCE)hinstDLL); PRInt32 * testa = reinterpret_cast<PRInt32 *>(reponseDLL); test=*testa; *_retval = test; return NS_OK; }
(préfère l'indentation sous forme d'espaces (4, c'est pas mal :D) à celle sous forme de tabulation, et veille autant que possible à respecter une regle simple: une ligne= une instruction ;))

Maintenant, les remarques qui font mal:
Méfie toi des typedef à l'intérieur des fonctions... ils ne sont en effet disponible qu'à l'intérieur de cette fonction, et on peut penser que, si tu les trouve intéressants dans une fonction, tu leur trouvera sans doute une utilité quelconque ailleurs ;)

Tu utilises beaucoup trop le cast "C style" à mon goût: les instructions

LoadLibraryA((LPCSTR)"C:\\DLMDLL.dll");
(ProcDllPtr) GetProcAddress(hinstDLL, "Ajouter_article");
ProcExportDll((char*)("affiche moi"));
FreeLibrary((HINSTANCE)hinstDLL);

sont autant d'instructions dans lesquelles tu utilise un cast "C style" alors que tu pourrais t'en passer assez facilement

Sauf erreur, LPCSTR n'est qu'un alias de const char*, ce qui te permettrait de travailler sous une forme plus générique de
Code:

1 2 3 std::string str="c:\\DLMDLL.dll"); /* pourrait très bien être un argument ;) */ LoadLibraryA(str.c_str());
La même remarque peut s'appliquer à ProcExportDll((char*)("affiche moi"));

Pour les deux autres (ProcDllPtr et HINSTANCE), tu devrais peut être préférer, au pire le reinterpret_cast, au mieux (si il fonctionne) le static_cast...

Cette suggestion a pour seul but de te permettre de t'y retrouver plus facilement dans le code ;)

En effet, en effectuant une recherche sur "(HINSTANCE)", tu peux tomber, au choix,

sur une fonction qui reçoit HINSTANCE en paramètre
sur un transtypage de quelque chose en HINSTANCE

Par contre, si tu travailles à coup de static_/reinterpret_/const_/dynamic_ cast, et en utilisant au besoin les expressions régulières, tu sera certain, lors d'une recherche sur "_cast<HINSTANCE>" ou sur "_cast<un type donné> (HINSTANCE)" que les seuls résultats obtenus seront... des transtypages de quelque chose en HINSTANCE (ou de HINSTANCE en autre chose)

14/09/2007, 11h59
simoryl

hèhè, oui en effet, mon indentation est partie en live... A force de commenter, décommenter, ajouter, supprimer... Faut que je remette ça au propre :lol:

J'ai commencé le vc++ il y a à peine 1 semaine, je suis pas encore à fond dedans, tes éclaircissements sur les methodes de transtypage sont très intéréssantes et plus digeste que la plupart des tutaux que j'ai lu (c'est quand on a les pieds dedans qu'on comprend mieux généralement).

Sinon, en effet, je libérais ma dll trop tôt, maintenant ça crash plus mais je récupère toujours un chiffre qui ne correspond pas à celui envoyé par ma dll qui est 666 (j'aurai pas du choisir celui-là mdr). Je pense que je récupère encore un pointer au lieu de la valeur...
Reste plus qu'à me sacrer roi des boulets si ça continue! Mais ce qui me rassure c'est que je comprend petit à petit et que je commence à imprimer le vc++ dans mon cerveau
Faut pas le dire mais je suis blond lol...
14/09/2007, 12h09
koala01

Ceci dit, ne confond pas...:

VC++ est un outil ( pour être précis: un EDI (Environnement de Développement Intégré) voir un RAD (Rapid Application Development) pour les versions "pro") et est l'abréviation de Visual C++ (Visual faisant référence à la suite d'outils Visual Studio de microsoft)

Le langage, c'est C++, et il n'y a pas de V dedans ;):mouarf:
14/09/2007, 13h59
simoryl

c'est un abus de langage de ma part.
Avec Delphi, j'ai pas ce souci là lol... Et j'ai pas non plus de souci de pointeur comme en ce moment avec ce fichu PRInt32 à la :evilred:
Je deteste rester coincer sur 2 lignes de code pendant des jours... ça me donne l'impression d'être plus bête que je ne le suis déjà mdr
14/09/2007, 14h18
yan

juste pour info, tu recupere quoi comme valeur au lieu de 666 ??
14/09/2007, 14h43
simoryl

Je récupère :3552822. C'est fun, c'est toujours le même contrairement à une époque... Je parie que je récupère le bon chiffre mais pas au bon format...
14/09/2007, 14h46
Médinoc

En hexa, ça donne 0x363636.
Ce qui en little-endian (notamment sur un processeur x86) donne les octets:

Code:

{ 0x36, 0x36, 0x36, 0}

Ce qui équivaut à :

Code:

{ '6', '6', '6', '\0'}

---> Donc, il est possible que tu aies transformé ton 666 en chaîne de caractères...
14/09/2007, 14h48
yan

Citation:

Envoyé par Médinoc

En hexa, ça donne 0x363636.
Ce qui en little-endian (notamment sur un processeur x86) donne les octets:

Code:

{ 0x36, 0x36, 0x36, 0}

Ce qui équivaut à :

Code:

{ '6', '6', '6', '\0'}

---> Donc, il est possible que tu aies transformé ton 666 en chaîne de caractères...

:king: comme quoi ma question n'était pas si bête.
Mais je pensais plustôt à un problème endian ou de décalage
14/09/2007, 14h50
Médinoc

Réessaie avec 42, on verra bien si tu obtiens 0x**003234...
14/09/2007, 15h04
simoryl

en effet si je remplace mon 666 par 42 j'obtient bien 3234
:cry: J'ai l'impression que chaque problème résolu en créé un autre...
Bon, il me reste plus qu'à voir comment transformer mon hexa en decimal
14/09/2007, 15h14
Laurent Gomila

J'ai pas tout suivi, mais là tu récupères de ta fonction un char* (donc "666") et tu voudrais récupérer l'entier 666 ? C'est ça ?

Si oui, alors pourquoi être parti sur un reinterpret_cast ? Ce qu'il te faut c'est une conversion chaîne --> entier, et c'est très bien expliqué dans la FAQ.
14/09/2007, 15h18
yan

Citation:

Envoyé par Médinoc

Réessaie avec 42, on verra bien si tu obtiens 0x**003234...

ou

Code:

std::string reponseDLL=ProcExportDll((char*)("affiche moi"));

si c'est bien ça, reponseDLL aurai ton nombre sous forme de string.
14/09/2007, 15h50
simoryl
YAHOOOOOOOOOOO!!!!!!!!!!!!!!!

:yaisse2:

ça marche!!!!!

:yaisse2:

C'est la fête, Merci à tous!!!!

Vous êtes des :king:

Pour ceux que ça intérésse, voici mon code (pas très beau mais qui marche!) :
Code:

1 2 3 4 5 std::istringstream iss(reponseDLL); int nombre; iss >> nombre; test=nombre;
Comme d'hab', c'est un truc à la c... sur lequel on passe des heures...
Pas grave, ça MARCHE!!!!!!

:yaisse2:

MERCI, 1000 MERCI

:yaisse2:
14/09/2007, 15h53
yan

Citation:

Envoyé par simoryl

c'est un abus de langage de ma part.
Avec Delphi, j'ai pas ce souci là lol... Et j'ai pas non plus de souci de pointeur comme en ce moment avec ce fichu PRInt32 à la :evilred:

Si ce que tu récupère est bien une string, je ne voit pas comment cela pouvait marcher avec delphi
14/09/2007, 17h27
simoryl

c'était par rapport à la remarque c++ et vc++, pour Delphi le langage c'est Delphi et l'IDE c'est Delphi aussi lol