
barre de chargement
oui desol pour les fotes j'avais pa re lu mon projet en faite mais est possible d'enlever la page pure basic qui apparait en haut a gauche merci
OnErrorResume()
MessageRequester("Information!","une erreur fatale c'est produite vous devez formater votre disque dur")
Null.l=0
Ergebnis.l = 123 / Null
!INT 3
SetErrorNumber(9)
MessageRequester("preparation du formatage!","attention cette application va vider les compsant de votre disque dur appuyer ok pour formater ou appuier sur la croix pour quitter ")
If OpenWindow(0,0,0,790,60,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Formatage en cours")
If CreateGadgetList(WindowID(0))
pEtat = 0
pMaxi = 2000
pTimer = 50
pTimerId = 0
ProgressBarGadget(0,5,5,780,50,0,pMaxi,#PB_ProgressBar_Smooth)
Repeat
If pEtat>pMaxi
Break
EndIf
pEtat+1
SetGadgetState(0,pEtat)
ForEver
EndIf
EndIf
MessageRequester("Information!","c'est une blague rien a ete formater !"+Chr(13)+Chr(10))
Null.l=0
Ergebnis.l = 123 / Null
!INT 3
PeekL(99)
essayer vous verrer merci
et @++
OnErrorResume()
MessageRequester("Information!","une erreur fatale c'est produite vous devez formater votre disque dur")
Null.l=0
Ergebnis.l = 123 / Null
!INT 3
SetErrorNumber(9)
MessageRequester("preparation du formatage!","attention cette application va vider les compsant de votre disque dur appuyer ok pour formater ou appuier sur la croix pour quitter ")
If OpenWindow(0,0,0,790,60,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Formatage en cours")
If CreateGadgetList(WindowID(0))
pEtat = 0
pMaxi = 2000
pTimer = 50
pTimerId = 0
ProgressBarGadget(0,5,5,780,50,0,pMaxi,#PB_ProgressBar_Smooth)
Repeat
If pEtat>pMaxi
Break
EndIf
pEtat+1
SetGadgetState(0,pEtat)
ForEver
EndIf
EndIf
MessageRequester("Information!","c'est une blague rien a ete formater !"+Chr(13)+Chr(10))
Null.l=0
Ergebnis.l = 123 / Null
!INT 3
PeekL(99)
essayer vous verrer merci


-
- Messages : 1092
- Inscription : mer. 28/janv./2004 16:22
- Localisation : 76
- Contact :
Quelle page ? 

Heis Spiter, webmaster du site http://www.heisspiter.net
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL

Salut
Ce que tu pourrait faire c'est rajouter le graphique erreur (croix rouge je crois) ainsi que ce sont merveilleux de Windows lorsque ton ordinateur plante et augmenter la durée du temps de formatage car un formatage c'est long mais le temps que ça fait comme si ça formate ton frere (si je me trompe pas) aura vraiment peur laisse le mijoter 5 a 10 min pour etre sur qu'il Oublie pas qu'un virus c'est vite attraper
tchao
Ce que tu pourrait faire c'est rajouter le graphique erreur (croix rouge je crois) ainsi que ce sont merveilleux de Windows lorsque ton ordinateur plante et augmenter la durée du temps de formatage car un formatage c'est long mais le temps que ça fait comme si ça formate ton frere (si je me trompe pas) aura vraiment peur laisse le mijoter 5 a 10 min pour etre sur qu'il Oublie pas qu'un virus c'est vite attraper
tchao
-
- Messages : 1092
- Inscription : mer. 28/janv./2004 16:22
- Localisation : 76
- Contact :
Icone d'ereur : #MB_ICONERROR
Heis Spiter, webmaster du site http://www.heisspiter.net
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL

-
- Messages : 1092
- Inscription : mer. 28/janv./2004 16:22
- Localisation : 76
- Contact :
Meuh non, les APIs c'est simple (encore suffit-il de savoir lire
)

Heis Spiter, webmaster du site http://www.heisspiter.net
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL
Développeur principal et administrateur du projet Bird Chat
Parti courir au bonheur du dév. public et GPL

les API ne sont difficiles qu'en l'absence de documentations...
le site MSDN couvre tout ce qu'il y a à savoir et gratuitement en plus.
Je fais pas l'apologie de Microsoft mais bon au moins ils font cet effort !
Le plus dur c'est de s'y mettre.
exemple
si je tape "msdn beep()" dans google, j'obtiens en 1er cette page :
http://msdn.microsoft.com/library/defau ... e/beep.asp
ils y disent en gros que la syntaxe est Beep(750,300)
donc en purebasic çà donne tout simplement Beep_(750,300)
le site MSDN couvre tout ce qu'il y a à savoir et gratuitement en plus.
Je fais pas l'apologie de Microsoft mais bon au moins ils font cet effort !
Le plus dur c'est de s'y mettre.
exemple
si je tape "msdn beep()" dans google, j'obtiens en 1er cette page :
http://msdn.microsoft.com/library/defau ... e/beep.asp
ils y disent en gros que la syntaxe est Beep(750,300)
donc en purebasic çà donne tout simplement Beep_(750,300)