Page 1 sur 1
[RESOLU] Flags
Publié : mar. 10/févr./2009 17:38
par Progi1984
Bonjour, je souhaiterais utiliserais des flags dans une de mes procédures.
Je souhaiterais pouvoir les ajouter et faire un test rapide des optiosn.
Code : Tout sélectionner
Genre : Option1 | Option2 | Option3
Test : If Flags contient Option1, etc...
Je sais que cela fait partie des spécifications de Purebasic, mais je n'arrive pas à voir où cela est
Merci d'avance
Publié : mar. 10/févr./2009 17:50
par cha0s
Code : Tout sélectionner
#Option1 = %001
#Option2 = %010
#Option3 = %100
Debug #Option1
Debug #Option2
Debug #Option1 | #Option2
Flag.i = #Option1 | #Option2
If Flag & #Option1 = #Option1
Debug "Option 1 dans le drapeau"
EndIf
If Flag & #Option2 = #Option2
Debug "Option 2 dans le drapeau"
EndIf
If Flag & #Option3 = #Option3
Debug "Option 3 dans le drapeau"
EndIf
question de 1 et de 0 ^^'
Publié : mar. 10/févr./2009 17:54
par tmyke
Tu veux dire un truc qui ressemblerait à ça ?
(exemple vraiment simplifié)
Code : Tout sélectionner
#FLAG1 = $0001
#FLAG2 = $0002
#FLAG3 = $0004
#FLAG4 = $0008
test.l = #FLAG1 | #FLAG3 | #FLAG4
Debug test
If (test & #FLAG1)
Debug "#FLAG1"
EndIf
If (test & #FLAG2)
Debug "#FLAG2"
EndIf
If (test & #FLAG3)
Debug "#FLAG3"
EndIf
If (test & #FLAG4)
Debug "#FLAG4"
EndIf
EDIT: oups, double post , désolé cha0s
Publié : mar. 10/févr./2009 17:59
par Progi1984
Exactement ce que je voulais. Merci à vous deux