Petite Question

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
totose
Messages : 6
Inscription : dim. 08/mars/2009 20:13

Petite Question

Message par totose »

Bonjour,

Petite Présentation Je m'appelle Sofiene J'habite a Marseille et j'ai 13 ans :D

J'ai Toujours Rêver De pouvoir Développer mes propre logiciel J'ai tout d'abord commencer par le C Un peu trop compliquer j 'ai appris les basse et Au bout d'un moment sa devenais un peu trop compliquer :oops: Puis Je me suis mit a la recherche d'un langage Simple Avec Un vaste Choix de possibilité :) je suis Tomber Sur le Purebasic

J'ai suivi le tuto sur le site du zéro j'ai donc apprit les base Voila ce que je sais faire : -Ouvrir Une Console
-Utiliser les Fonction
-Ouvrir Une Fenêtre
-Positionner les Gadget
-Gestion des option (#..._..._)
Voila M'est Question J'ai beau chercher sur Le fichier d'aide je n'arrive pas a trouver : Voila Petite Exemple Une Fenetre J'y place Un Bouton je veux Fait Comment Pour faire si bouton appuyer alors Ouvrir la 2eme fenêtre Il faut utiliser une condition Mais que mettre dans la condition ?

Et aussi Je cherche une personne Pour m'initier au Purebasic Comme un prof :o (Msn,Skype Ou Bien par mail)

Merci Beaucoup Et a Bientot :D
Avatar de l’utilisateur
Le psychopathe
Messages : 764
Inscription : jeu. 03/mars/2005 19:23

Message par Le psychopathe »

Voilà une petite idée, le code ne fonctionne pas, regardes le code de test dans l'aide ;)

Code : Tout sélectionner

Procedure Open_Window_0() 
endprocedure



Procedure Open_Window_2() 
endprocedure


Open_Window_0() 
Repeat ; boucle principale , qui gere les affichages dans l'ecran graphique et les evenement de la fenetre 

Event = WindowEvent () ; attends de recevoir un evenements de la fenetre 
WindowID = EventWindow () ; The Window where the event is generated, can be used in the gadget procedures 

GadgetID = EventGadget () ; Is it a gadget event? 

EventType = EventType () ; The event type 

;You can place code here, and use the result as parameters for the procedures 

If Event = #PB_Event_Gadget 
If GadgetID = #Button_0 
Open_Window_2() ; ouvrir fenetre 2 
End 
EndIf 
EndIf 
Until Event = #PB_Event_CloseWindow ; End of the event loop 

Avatar de l’utilisateur
venom
Messages : 3138
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

Salut totose et bienvenue sur le forum.

pour ta question plusieurs choix s'offre a toi en voici un que je viens de faire " vite fait ".

Code : Tout sélectionner

;- Window Constants
Enumeration
  #Window_0
  #Window_1
EndEnumeration

;- Gadget Constants
Enumeration
  #Button_0
  #Button_1
EndEnumeration

;------ ont créer la fenetre avec le button
  If OpenWindow(#Window_0, 216, 0, 600, 300, "fenetre 1",  #PB_Window_SystemMenu | #PB_Window_TitleBar )
    ButtonGadget(#Button_0, 10, 10, 190, 30, "Faire apparaitre la fenetre 2") 
  EndIf

;---- ont créer une boucle d'évenement
  Repeat
   EventID = WaitWindowEvent()
    If EventID = #PB_Event_Gadget 
      Select EventGadget()
      
     ;----- quand ont appuie sur le button_0 ont fait appel a la fenetre_2
       Case #Button_0
        If OpenWindow(#Window_1, 433, 108, 600, 300, "fenetre 2", #PB_Window_TitleBar )
          ButtonGadget(#Button_1, 10, 10, 190, 30, "Faire dissparaitre la fenetre 2")
        EndIf
        
     ;----- quand ont appuie sur le button_1 ont cache la fenetre 2
       Case #Button_1
        HideWindow(#Window_1, 1) 
      
      EndSelect
    EndIf
;----- quand ont appuie sur la croix rouge ont quitte le programme
  Until EventID = #PB_Event_CloseWindow
 End
mais il y a d'autre façon d'obtenir le résultat que tu souhaite:

- tu peut utilisé le bouton recherche du forum :wink:

- tu peut regarder dans la section débutant du forum Dobro, a mis un post-it tuto ou se trouve pleins de bon tutoriel pour apprendre.

voila en te souhaitant bon courage et a bientôt.





@++
Windows 10 x64, PureBasic 5.73 x86 & x64
GPU : radeon HD6370M, CPU : p6200 2.13Ghz
totose
Messages : 6
Inscription : dim. 08/mars/2009 20:13

Message par totose »

Super Sympa jai tout comprit Sauf le enumeration et le end enumeration :P
Avatar de l’utilisateur
venom
Messages : 3138
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Message par venom »

dans purebasic tu appuie sur F1 et tu recherche enumeration
tout y est :wink:





@++
Windows 10 x64, PureBasic 5.73 x86 & x64
GPU : radeon HD6370M, CPU : p6200 2.13Ghz
totose
Messages : 6
Inscription : dim. 08/mars/2009 20:13

Message par totose »

Super Merci mec jai lu le tuto de Dobro Frnachement Bravo
jbernard13
Messages : 1501
Inscription : dim. 18/avr./2004 15:04
Localisation : sud de la france

Message par jbernard13 »

salut

va voir ici les super tutos :

http://tripamort.free.fr/tuto.php
Jbernard13
Répondre