ANIMATED WINDOWS

fg85 Messages postés 370 Date d'inscription dimanche 28 mars 2004 Statut Membre Dernière intervention 13 avril 2007 - 27 janv. 2005 à 17:38
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 - 3 févr. 2005 à 00:54
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/29113-animated-windows

ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
3 févr. 2005 à 00:54
Ah ça, je ne sais pas !!!
Faut voir...
didyman Messages postés 86 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 8 novembre 2007
2 févr. 2005 à 02:19
OK... alors pour mon jeux de tictactoe que je fait... lorsque un dessin affiche sa fais un genre de ti flash noir dans la fenntre... fac si je met DoEvents a la fin sa ne devrais pas faire sa?
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
2 févr. 2005 à 01:23
"DoEvents" sert à redonner temporairement (un temps quoi) la "main" à Windows. Comme ça, si Windows a un truc un faire, il le fait et notre programme ne l'accapare pas pour lui tout seul.
Dans les faits, ça sert surtout à laisser le temps à Windows de redessiner ou d'effacer la fenêtre du prog sans quoi il y aurait des bugs d'affichage.

Beaucoup de "bugs" proviennent de ça...
didyman Messages postés 86 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 8 novembre 2007
1 févr. 2005 à 15:12
Et le doevents????
Je sais.. je pose beaucoup de question!
didyman Messages postés 86 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 8 novembre 2007
1 févr. 2005 à 00:37
Merci beacoup..... La tu répond a ma question :P!!!!

Merci! et très bien détailler en passant!!!

Et c'est bon a savoir pour le FIX et le INT
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
1 févr. 2005 à 00:04
Didyman :
Voici ce que dit la MSDN au sujet de FIX et INT :
"
Différence entre les fonctions Int et Fix : si number est négatif, Int renvoie le premier entier négatif inférieur ou égal à number, alors que Fix renvoie le premier entier négatif supérieur ou égal à number. Par exemple, Int convertit -8,4 en -9 et Fix convertit -8,4 en -8.

Fix(number) équivaut à :
Sgn(number) * Int(Abs(number))
"

ssauvage : je sens bien que tu es un fan des combos ;-). Non, je crois que ça aurait été superflu...
ssauvage Messages postés 47 Date d'inscription vendredi 28 février 2003 Statut Membre Dernière intervention 9 octobre 2012
31 janv. 2005 à 11:01
Facile, joli et bien commenté. Bravo.
J'aurai juste ajouté dans l'exemple une combo permettant de choisit l'effet qui va être appliqué à la fermeture...
didyman Messages postés 86 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 8 novembre 2007
31 janv. 2005 à 03:26
Merci mais je voulais savoir quelle est la difference entre INT et FIX??? le reste je connais.. merci quand meme
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
30 janv. 2005 à 21:07
Oops, Ignorez le commentaire précédent... C'était pour une autre source... Désolé.

Pour le FIX, oui, c'est un peu comme INT à une petite différence...

Mais le plus important c'est RND. En effet, si vous RND renvoie une valeur entre 0 et <1 soit, p.ex. "0,99999...".

Du coup, si vous mettez :

varAleatoire = RND * 5
"varAleatoire" sera compris entre 0 et 4,999...

FIX tronque la partie décimale. Donc :

varAleatoire = FIX(RND * 5)
"varAleatoire" pourra être 0, 1, 2, 3 ou 4.

Donc, pour obtenir une valeur entre 1 et X il faut :
varAleatoire = FIX(RND * 5) + 1
Là on aura une valeur comprise entre 1 inclus et 5 inclus où "5" sera la valeur Maxi.


Dim varBase As Boolean
Dim varMax As Byte
Dim varAleatoire As Byte

varBase = False 'Minimum à 0
'varBase = True 'Minimum à 1

varMax = 9

If varBase=False Then

varAleatoire = Fix(Rnd * (varMax + 1) )

Else 'True

varAleatoire = Fix(Rnd * varMax) + 1

End If


Et encore merci à tous pour cette note non mérité (c'est pas moi qui est fait l'API !!!)...
didyman Messages postés 86 Date d'inscription vendredi 26 novembre 2004 Statut Membre Dernière intervention 8 novembre 2007
30 janv. 2005 à 15:37
Tres bon tuto pour moi (étant débutant dans les API)

Mais juste une chose... a koi il set le FIX devant le RND?? Es-ce un genre de Int(Rnd * 9) + 1 ???
cs_sam013 Messages postés 75 Date d'inscription samedi 27 mars 2004 Statut Membre Dernière intervention 4 juillet 2005
30 janv. 2005 à 12:30
c le toooop :d
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
30 janv. 2005 à 00:20
Alors je suis content :-)
cs_sam013 Messages postés 75 Date d'inscription samedi 27 mars 2004 Statut Membre Dernière intervention 4 juillet 2005
29 janv. 2005 à 21:05
:D

Merci, moi sa me sert aussi, et hop, vue ma debutentissiter ! lol c'est de mon niveau :o

Merci l'amis !

10 sUr 10
ScSami Messages postés 1488 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 décembre 2007 24
28 janv. 2005 à 00:53
Merci. et j'espère que ça te servira...

Perso, je trouve l'effet de fondu par opacité assez impressionnant (surtout quand on veux se la péter ;-).
fg85 Messages postés 370 Date d'inscription dimanche 28 mars 2004 Statut Membre Dernière intervention 13 avril 2007
27 janv. 2005 à 17:38
Bon script peu aidé pas mal de débutant (comme moi ;-)
---------------------------
http://fg.logiciel.free.fr
Rejoignez-nous