TypOf()

Vous avez une idée pour améliorer ou modifier PureBasic ? N'hésitez pas à la proposer.
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

TypOf()

Message par falsam »

Cette fonction permet de connaitre le datatype d'une variable. Les variables non typées n'existant pas, je ne vois pas l’intérêt de cette fonction avec PureBasic, étant donné qu'on va tester une variable dont on connait forcément le datatype.

Code : Tout sélectionner

Procedure Dummy(a)
  Debug TypeOf(a)
EndProcedure

Dummy(12.6)
Dummy(10)
Pas trés interessant .

Par contre j'aurais bien aimé que TypOf("test") par exemple me retourne la valeur #PB_String. Merci Monsieur Fred :wink:
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Avatar de l’utilisateur
Micoute
Messages : 2522
Inscription : dim. 02/oct./2011 16:17
Localisation : 35520 La Mézière

Re: TypOf()

Message par Micoute »

Bonjour falsam, ça ne marche pas ton truc, car ça sort toujours 21 (#PB_Integer).

il faut faire ceci:

Code : Tout sélectionner

Macro adapter(variable)
   Select TypeOf(variable)
      Case #PB_Double
         resultat.d = PeekD(@variable)
         
      Case #PB_String
         resultat.d = ValD(PeekS(@variable))
         
   EndSelect
EndMacro

chaine.s = "5.659"
adapter(chaine)
Debug resultat

var_double.d = 59.5613
adapter(var_double)
Debug resultat
Microsoft Windows 10 Famille 64 bits : Carte mère : ASRock 970 Extreme3 R2.0 : Carte Graphique NVIDIA GeForce RTX 3080 : Processeur AMD FX 6300 6 cœurs 12 threads 3,50 GHz PB 5.73 PB 6.00 LTS (x64)
Un homme doit être poli, mais il doit aussi être libre !
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: TypOf()

Message par falsam »

Micoute a écrit :Bonjour falsam, ça ne marche pas ton truc, car ça sort toujours 21 (#PB_Integer).
Je le sais d'ou mon code que j'ai commenté en disant que ce n'est pas intéressant.
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Brayane
Messages : 54
Inscription : jeu. 27/août/2015 14:08

Re: TypOf()

Message par Brayane »

Ceci me rappel justement un soucis que j'ai eu avec une macro, ou tu résume bien le truc
Dans une macro pas de type définie en entrée et donc t'es coincé pour savoir le type que c'est !

Exemple:

Code : Tout sélectionner

Macro TypeDe(Variable)
  Debug TypeOf(Variable)
EndMacro

MaVariable$ = "Def"
MaVariable = 456

TypeDe(MaVariable$)
TypeDe(MaVariable)
TypeDe("Abc")
TypeDe(123)
Alors comment ont fait dans ces cas précis pour savoir le type du paramètre en entrée hein ? :?
Mesa
Messages : 1093
Inscription : mer. 14/sept./2011 16:59

Re: TypOf()

Message par Mesa »

Les fonctions du compilateur comme TypeOf, SizeOf, OffsetOf sont rarement utilisées. Elles sont utiles quand on utilise les api, les structures de façon complexe, un compilateur externe par exemple quand on veut compiler du code d'un microcontrôleur de type PIC ou ATMEL ou autre tout en utilisant l'IDE de PB, etc. Quand on veut faire un mélange de Basic et d'assembleur...

Elles font partie de ces petites instructions qui ne paient pas de mine pour le programmeur amateur (comme moi) mais importante pour un programmeur avancé.

Mesa.
Brayane
Messages : 54
Inscription : jeu. 27/août/2015 14:08

Re: TypOf()

Message par Brayane »

Bonjour,

Spock, regarde bien mon code et tu verras que ton code ne marche pas (Enfin si ton code mais pas pour ce que je veux en faite)
Tu regarde bien mon code et tu devrais comprendre :)

Tu ne comprends pas ?
Aller, je te remet le code ici:

Code : Tout sélectionner

Macro TypeDe(Variable)
  Debug TypeOf(Variable)
EndMacro

MaVariable$ = "Def"
MaVariable = 456

TypeDe(MaVariable$)
TypeDe(MaVariable)
TypeDe("Abc")
TypeDe(123)
Tu vois bien que j'ai raison et que ces deux paramètre ne marche pas (Les deux dernier) :(
Si je veux entrer les paramètres tel qu'il le sont ça ne marche pas !

Merci de ton aide.
Avatar de l’utilisateur
djes
Messages : 4252
Inscription : ven. 11/févr./2005 17:34
Localisation : Arras, France

Re: TypOf()

Message par djes »

On ne passe pas des variables à une macro, mais des paramètres. C'est complètement différent. Un paramètre pour une macro, c'est du code source.

Il faut bien comprendre qu'une macro n'est pas une procédure. Une macro n'est pas compilée. Une macro est comme le résultat d'un copier/coller de code. Elle sert à clarifier/simplifier/optimiser le code SOURCE, c'est à dire le TEXTE qui va être envoyé au compilateur, et qui sera transformé en programme exécutable.

Ton programme ne fonctionne pas parce que tu donnes à la fonction TypeOf autre chose qu'une variable.
Avatar de l’utilisateur
Micoute
Messages : 2522
Inscription : dim. 02/oct./2011 16:17
Localisation : 35520 La Mézière

Re: TypOf()

Message par Micoute »

+1 pour Spock.
Microsoft Windows 10 Famille 64 bits : Carte mère : ASRock 970 Extreme3 R2.0 : Carte Graphique NVIDIA GeForce RTX 3080 : Processeur AMD FX 6300 6 cœurs 12 threads 3,50 GHz PB 5.73 PB 6.00 LTS (x64)
Un homme doit être poli, mais il doit aussi être libre !
Brayane
Messages : 54
Inscription : jeu. 27/août/2015 14:08

Re: TypOf()

Message par Brayane »

djes a écrit :On ne passe pas des variables à une macro, mais des paramètres. C'est complètement différent. Un paramètre pour une macro, c'est du code source.

Il faut bien comprendre qu'une macro n'est pas une procédure. Une macro n'est pas compilée. Une macro est comme le résultat d'un copier/coller de code. Elle sert à clarifier/simplifier/optimiser le code SOURCE, c'est à dire le TEXTE qui va être envoyé au compilateur, et qui sera transformé en programme exécutable.

Ton programme ne fonctionne pas parce que tu donnes à la fonction TypeOf autre chose qu'une variable.
Oui, je comprends bien et j'avais compris :)

Voir ce sujet ou Falsam à compris ou je voulais en venir:
http://www.purebasic.fr/french/viewtopi ... =1&t=15458

Exemple;

Code : Tout sélectionner

TypeOf(#Variable) ; Renvérait par exemple "Constante"
TypeOf(Variable$) ; Renvérait par exemple "Variable String"
TypeOf(Variable.s) ; Renvérait par exemple "Variable String"
TypeOf(Variable.i) ; Renvérait par exemple "Variable Integer"
TypeOf(Variable.f) ; Renvérait par exemple "Variable Float"
TypeOf(Variable.d) ; Renvérait par exemple "Variable Double"
TypeOf("Abc") ; Renvérait par exemple "Chaîne de caractère"
TypeOf(123) ; Renvérait par exemple (suivent la nombre), ici "Ascii" ou alors simplement "Nombre"
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Re: TypOf()

Message par nico »

On ne passe pas des variables à une macro, mais des paramètres.
Oui mais le paramètre peut être une valeur.


TypeOf n'accepte que des variables et pas les valeurs, logique mais Brayane ne le comprend pas.
Brayane
Messages : 54
Inscription : jeu. 27/août/2015 14:08

Re: TypOf()

Message par Brayane »

Si si j'ai bien compris tkt pas ;)
Avatar de l’utilisateur
djes
Messages : 4252
Inscription : ven. 11/févr./2005 17:34
Localisation : Arras, France

Re: TypOf()

Message par djes »

nico a écrit :
On ne passe pas des variables à une macro, mais des paramètres.
Oui mais le paramètre peut être une valeur.


TypeOf n'accepte que des variables et pas les valeurs, logique mais Brayane ne le comprend pas.
Non, pas vraiment, parce que le parser n'a pas encore «traduit» le texte. Nous, on met ce qu'on considère une valeur, mais pour le pré-interpréteur, ce n'est toujours que du code source. Coupons les cheveux en 4 jusqu'au bout lol
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Re: TypOf()

Message par nico »

Je suis d'accord avec toi, vu du coté PureBasic; le programmeur écrivant la macro doit décider de ce qu'il souhaite faire, a savoir si la substitution de texte servira ou pas à garder le texte (paramètre) comme une variable.

Il sera utile par exemple d'utiliser une macro vu comme une fonction dans le cas où l'on souhaiteras avoir plusieurs valeurs de retour sans passer par des pointeurs.
Ollivier
Messages : 4190
Inscription : ven. 29/juin/2007 17:50
Localisation : Encore ?
Contact :

Re: TypOf()

Message par Ollivier »

J'ajouterai que les arguments d'une macro, c'est un ensemble d'actions de copier-coller avant le copier/coller principal de l'ensemble de la macro.

Deux ratissages de code, le pré-processing en 3 étapes:

1) Recherche des données des arguments
2) Occurenciation des données de la macro
3) Remplacement final
Avatar de l’utilisateur
blendman
Messages : 2017
Inscription : sam. 19/févr./2011 12:46

Re: TypOf()

Message par blendman »

@Brayanne : je suis d'accord avec toi, ce serait intéressant d'avoir un système pour savoir si la valeur qu'on rentre (dans une macro) est un string, un integer ou autre chose ;)

Code : Tout sélectionner

TypeOf("Abc") ; Renverrait par exemple "Chaîne de caractère"
TypeOf(123) ; Renverrait par exemple (suivent la nombre), ici "Ascii" ou alors simplement "Nombre
"
ça permettrait de faire des macro comme :

Code : Tout sélectionner

Macro PrintC(text)
  if TypeOff(text) = #pb_string
    drawtext(0,0,text)
  else
    drawtext(0,0,str(text))
  endif
EndMacro
Edit :
Youpi, Falsam a fait une macro qui fonctionne plutôt pas mal !
http://www.purebasic.fr/english/viewtop ... 12&t=63241

Merci à lui (encore une fois)
Répondre