Convertion de code

[dayvid]

Bonjour !

Comment puis-je convertir ceci :

Si [a] = {'1', '2', '3'}
ou Si = {"a", "b", "c"}
et Si [c] = {[a], , [c]}
ou Si [d] = {'1', "b", [e]}
ou Si [e] = {'2' + '2', "b" + "c", [e] - }
ou Si [f] = {'2' + [e], "b" + [a], [e] - '5'}

en ceci (si je me suis pas trompé dans la conversion) :

If (a = 1 Or a = 2 Or a = 3)
or (b = "a" Or b = "b" Or b = "c")
And (c = a Or c = b Or c = c)
or (d = 1 Or d = "b" Or d = e)
or (e = 2 + 2 Or e = "b" + "c" Or e = e - b)
or (f = 2 + e Or f = "b" + str(a) Or f = e - 5)

Bin en sachant que certaines variable, on ne sait pas de qu’elle type elle sons

[Kwai chang caine]

Bin en sachant que certaines variable, on ne sait pas de qu’elle type elle sons

Je croyais qu'en PB c'etait pas possible....
En PB le VARIANT n'existe pas...ou alors ça viens de sortir

Pour pouvoir melanger les types de variable faut faire du VdauBe

[dayvid]

Oh sa va j'ai pas dit que je vous lachais quand même
je teste juste pour voir ya rien de mal si ?

c'est vrais qu'il est dur quand même hein !

[Backup]

Je croyais qu'en PB c'etait pas possible....
En PB le VARIANT n'existe pas...ou alors ça viens de sortir

si ça existe

c'est une structure reconnu par Le purebasic

le Viewer de Structure renvoie ceci :

Code : Tout sélectionner

Structure	VARIANT
	vt.w
	wReserved1.w
	wReserved2.w
	wReserved3.w
	StructureUnion
	    llVal.q
	    lVal.l
	    bVal.b
	    iVal.w
	    fltVal.f
	    dblVal.d
	    boolVal.w
	    bool.w
	    scode.l
	    cyVal.l
	    date.d
	    bstrVal.i
	    *punkVal.IUnknown
	    *pdispVal.IDispatch
	    *parray.l
	    *pbVal.BYTE
	    *piVal.WORD
	    *plVal.LONG
	    *pllVal.QUAD
	    *pfltVal.FLOAT
	    *pdblVal.DOUBLE
	    *pboolVal.LONG
	    *pbool.LONG
	    *pscode.LONG
	    *pcyVal.LONG
	    *pdate.DOUBLE
	    *pbstrVal.INTEGER
	    *ppunkVal.INTEGER
	    *ppdispVal.INTEGER
	    *pparray.INTEGER
	    *pvarVal.VARIANT
	    *byref.l
	    cVal.b
	    uiVal.w
	    ulVal.l
	    ullVal.q
	    intVal.l
	    uintVal.l
	    *pdecVal.LONG
	    *pcVal.BYTE
	    *puiVal.WORD
	    *pulVal.LONG
	    *pullVal.QUAD
	    *pintVal.LONG
	    *puintVal.LONG
	    decVal.l
	    brecord.VARIANT_BRECORD
	EndStructureUnion

[Kwai chang caine]

Oui je sais que la structure est reconnue par PB
Sinon comment j'aurais fait pour rappatrier des variants de VB6

Et meme la structure SafeArray et SAfeArrayBound existe aussi, je m'en suis servie toutes les deux pour rappatrier les tableaux cette fois ci toujours de VB6
J'te parle pas des Tableaux SafeArray de Variants

Mais par contre pour ce qui est de les gerer dans PB, je crois que j'avais vu un code y'a longtemps, mais on peut pas dire que ce soit bien utilisé.
C'est assez compliqué je crois à expliquer à PB qu'il peut mettre aussi bien une string qu'un integer dans la meme variable...
Mais bon..les programmeurs de VB y sont arrivés...pourquoi pas PB ???

En plus c'est un sacré gachi de place, car je crois que ça prend 16 octet...pas mal hein pour l'optimisation de la mémoire

[Kwai chang caine]

Oh sa va j'ai pas dit que je vous lachais quand même
je teste juste pour voir ya rien de mal si ?

Aucun, en plus VB est quand meme un des langages les plus utilisés, rien qu'a cause de VBA

c'est vrais qu'il est dur quand même hein !

Pour la simplicité, je trouve que Dot.net est vachement moins accessible, mais par contre il est beaucoup plus puissant et cette fois c'est de la vraie POO à 100%, alors que VB6 etait croisé porte et fenetres
Reste quand meme que pour "simplifier" la programmation..il ont créé un vrai mamouth, avec en plus tous ses petits derriere qu'il installe partout