PureBasic

If OpenWindow(0, 0, 0, 300, 70, "SpinGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
SpinGadget (0, 20, 20, 100, 25, -100, 100,#PB_Spin_Numeric)
TextGadget(1,150,20,100,20,"..")
Repeat
Evenement = WaitWindowEvent()
If Evenement = #PB_Event ...

les chinois dans un seul caractere il peuvent ecrire :

Je te te remercie honorable invité de bien vouloir fouler le pas de mon humble boutique hinhinhin .... :lol:

Mais oui, on peux en un caractere ne dire pas qu'une seule lettre, mais plusieurs ou un mot
donc ton post precedent pourrait tenir ...

Les tableaux sont toujours locaux par défaut, donc pour accéder à partir d'une procedure à un tableau défini dans le code source principal du programme, l'utilisation de Global ou Shared est requise.
donc avec Global Procedure ess_redim_tab()

Global Dim nom_page.s(1,1)
For i=1 To 5
ReDim ...

Chris a écrit :(même si t'en as pas beaucoup, des idées)

Bah si Chris, Kwai n'a QUE ça...des idées!

Salut Kwai,

@RV
Pour info, ce code y marche pas chez moi (Normal )

Premièrement...t'as un écran? :lol:

Balancer un code qui ne marche pas alors ouais je te réponds qu'effectivement ce n'est pas normal! :(
Je l'ai pourtant testé dans tous les sens avant de le poster et chez moi il marche ...

Ce qui donne un truc comme ça!
ExamineDesktops()
DW=DesktopWidth(0)
DH=DesktopHeight(0)

Structure AppBar
NotUsed1.l
NotUsed2.l
NotUsed3.l
Position.l
LeftX.l
LeftY.l
RightX.l
RightY.l
EndStructure
Info.AppBar

SHAppBarMessage_(5,Info)
BLX=Info\LeftX : BLY=Info\LeftY : BRX=Info ...

Pour quelque chose de plus précis, il vaut mieux connaitre la taille de la barre des tâches mais aussi ou elle est positionnée à l'écran (pas tjrs en bas).

Jette un oeil sur ce code qui te donne tout ce qu'il faut savoir sur la barre des tâches.

; German forum: http://www.purebasic.fr/german ...

Kwai chang caine a écrit :Trrrriiiii tttroouuuu ttrriii toouuu

>Load error !

"Press play then any key."

@comtois

SendMail(0, "smtp.orange.fr", 25, 1) ou
SendMail(0, "smtp-msa.orange.fr", 587, 1)
resultat=0,-1,-2

SendMail(0, "smtp.orange.fr", 25, 0) ou
SendMail(0, "smtp-msa.orange.fr", 587, 0)
resultat=-2

Même résultat quoi...

Oui , je reçois bien le mail que je m'envoie, et j'ai aussi testé la biblio FTP , je peux envoyer un fichier sur mon site et en récupérer. Je n'ai pas testé plus que ça pour l'instant.

J'ai une adresse free et une adresse hotmail , j'ai utilisé mon adresse free pour m'envoyer un message sur mon ...

Oliv : Pour fermer une courbe soit tu en sélectionne une autre soit dans le menu Courbes tu fais "Retour à la fenêtre principale".
J'ai remarqué que tu n'affichais pas de SystemMenu dans tes fenêtres secondaires certainement parce que lorsque tu cliquais sur "Fermer" alors toute ton appli se ...

Je ne peux pas utiliser WaitWindowEvent() car le programme doit pouvoir fonctionner aussi pour le réseau, donc si il est désactivé.
Tu peux mettre à la place un WaitWindowEvent( 10 ) :wink:
Ainsi ta boucle sera passée en revue toutes les 10ms même si aucun évènement n'intervient et la aussi ton ...

Si seulement tu pouvais coder autant que tu parles...

A plus...

En attendant........"groumph,groumph", fu weux on monmon ?? :D

http://purebasic.myftp.org/files/413/Bonbon.jpg

:lol: :lol: :lol:

Impec le code de Danilo...je garde...il me reservira :D

Sinon pour ton problème...vois si enfin :roll: ça te va! :wink:
; Code créé par RV avec l'aide de Kwai ...

@Kwai
Décidément tu devrais vraiment te trouver un dimanche de libre heu...on peut voir ça en mp? Ya du monde qui nous regarde! :oops:

Comment pourrais je un jour te remercier En étant moins exigeant la prochaine fois! :roll: :D

Surement pas avec du code Bah si...si tu me files la carte bleue ...